Do you really need the extra rows?
If for appearance only, select all the rows and double their height through
Format>Row>Height or drag the bottom selected row to a size you like.
OR you could use a macro if you so choose.
Sub InsertRows()
Application.ScreenUpdating = False
Dim numRows As Integer
Dim r As Long
numRows = 1
For r = 2500 To 1 Step -1
'change the 2500 to suit your range
ActiveSheet.Rows(r + 1).Resize(numRows).EntireRow.Insert
Next r
Application.ScreenUpdating = True
End Sub
Gord Dibben MS Excel MVP
On Mon, 18 Sep 2006 11:16:02 -0700, curiouscat
Gord Dibben MS Excel MVP