Inserting a blank row between rows of data

  • Thread starter Thread starter Michael Styles
  • Start date Start date
M

Michael Styles

I have three Excel 2007 lists, around 200 rows each. I've now found I need
to insert a blank row after each list entry. Is there any easy way to do
this? I'm pretty decent with Excel, but don't know VBA. I thought of
recording a macro, but didn't know how to edit it so that I wouldn't have to
repeat the same action 200 times for the first list. Can anyone help?
 
Sub insertrows()
dim i as long
For i = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
Rows(i).Insert
Next i
End Sub
 
Crooks! :-)
From my book, page 111!
Note on the video: Actually, it's ready to sort without changing the cells
at the bottom to that formula (=cells above +1)
Bob Umlas
Excel MVP
 
I have three Excel 2007 lists, around 200 rows each. I've now found I
need to insert a blank row after each list entry. Is there any easy way
to do this? I'm pretty decent with Excel, but don't know VBA. I thought
of recording a macro, but didn't know how to edit it so that I wouldn't
have to repeat the same action 200 times for the first list. Can anyone
help?
Click to expand...
Free ASAP Utilities has this function.

Eric
 
Back
Top