S
Sal
Is there a better way to delete row 1 in Sheet1 than this
Sheets("Sheet1").Select
Rows("1:1").Select
Selection.Delete Shift:=xlUp
Range("A1").Select
Is there a better way to delete Column B in Sheet1 than this?
Sheets("Sheet1").Select
Columns("B:B").Select
Selection.Delete Shift:=xlToLeft
Is there a better way using Sheet1, to Cut Column D and paste the cut cells
in front of Column A than this?
Sheets("Sheet1").Select
Columns("D").Select
Selection.Cut
Columns("A:A").Select
Selection.Insert Shift:=xlToRight
Sheets("Sheet1").Select
Rows("1:1").Select
Selection.Delete Shift:=xlUp
Range("A1").Select
Is there a better way to delete Column B in Sheet1 than this?
Sheets("Sheet1").Select
Columns("B:B").Select
Selection.Delete Shift:=xlToLeft
Is there a better way using Sheet1, to Cut Column D and paste the cut cells
in front of Column A than this?
Sheets("Sheet1").Select
Columns("D").Select
Selection.Cut
Columns("A:A").Select
Selection.Insert Shift:=xlToRight