Here's a VBA solution (Quicky)..
Presently assumes Your data (rows) are among others also in Column A
Paste this in a Standard module and run it
Back up your data before doing so to prevent Unforeseen "PROBLEMS"!!
Sub InsertBlkRows()
Dim lr As Long
Dim fr As Long
Dim i As Integer
fr = InputBox("My First Row is Excel Numbered Row - What?")
lr = Range("A65536").End(xlUp).Row
For i = lr To (fr + 1) Step -1
Range("A" & i).EntireRow.Insert
Next i
End Sub
HTH,
Jim May