$xl->Selection->Delete({ Shift => xlToLeft });