Hi, I currently have the below code that deletes rows between row 220 - 40 if the data in column A for that row is blank.
Would it be possible to then rather than delete all rows, leave 10 blank rows after the last row in column A with data.
for example if row 40 were my only row then the 10 rows after that would be inserted.
The other option is to start at A1000 x1up and ofset it by -3 then insert 10 rows but i don't know which is the easiest way to go or how to add that to my existing code.
Thanks
Would it be possible to then rather than delete all rows, leave 10 blank rows after the last row in column A with data.
for example if row 40 were my only row then the 10 rows after that would be inserted.
The other option is to start at A1000 x1up and ofset it by -3 then insert 10 rows but i don't know which is the easiest way to go or how to add that to my existing code.
Thanks
Excel Formula:
Sub Del()
For r = 220 To 40 Step -1
Set Rng = Range("A" & r & ":i" & r)
If WorksheetFunction.CountA(Rng) = 0 Then
Rng.Resize(, 11).Delete Shift:=xlUp
End If
Next r
End Sub