lasher18
04-10-2021, 07:51 AM
Hi all,
I have been trying to automate the following task with the macro recorder. I did it for one row, now I need to do that for every row individually through a range iteration. Let's say my range is A2:J23.
Could you help me?
Thanks
Sub Macro1()'
' Macro1 Macro
'
'
Range("D756").Select
Range(Selection, Selection.End(xlToRight)).Select
Range("D756:U756").Select
Selection.Delete Shift:=xlToLeft
Range("D756").Select
Range(Selection, Selection.End(xlToRight)).Select
Range("D756:AH756").Select
Selection.Delete Shift:=xlToLeft
End Sub
I have been trying to automate the following task with the macro recorder. I did it for one row, now I need to do that for every row individually through a range iteration. Let's say my range is A2:J23.
Could you help me?
Thanks
Sub Macro1()'
' Macro1 Macro
'
'
Range("D756").Select
Range(Selection, Selection.End(xlToRight)).Select
Range("D756:U756").Select
Selection.Delete Shift:=xlToLeft
Range("D756").Select
Range(Selection, Selection.End(xlToRight)).Select
Range("D756:AH756").Select
Selection.Delete Shift:=xlToLeft
End Sub