BIGALINWALES
IS-IT--Management
Hey,
I need to clear the contents of every 4th row starting from row 3 and then insert two new rows aswell. I have this which works if you put numbers in place of the i's on the rows command. Should i be an Integer?
Many Thanks in advance
Alex
Dim i As Integer
For i = 3 To 120 Step 4
Rows("i:i"
.Select
Selection.ClearContents
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Next
I need to clear the contents of every 4th row starting from row 3 and then insert two new rows aswell. I have this which works if you put numbers in place of the i's on the rows command. Should i be an Integer?
Many Thanks in advance
Alex
Dim i As Integer
For i = 3 To 120 Step 4
Rows("i:i"
Selection.ClearContents
Selection.Insert Shift:=xlDown
Selection.Insert Shift:=xlDown
Next