Here is a macro MVP Don Guillett wrote in reply to a similar request. It
assumes the 700 names are in column A. Column A is represented by the 1 in
Cells(Rows.Count, 1). Change it if necessary (A=1, B=2, etc.)

Sub insertrows()
'by Don Guillett
Dim i As Long
For i = Cells(Rows.Count, 1).End(xlUp).Row To 2 Step -1
Rows(i).Resize(4).Insert
Next i
End Sub

Put this code in a general Visual Basic module:
1. ALT-F11 brings up the Visual Basic Editor (VBE) window
2. ALT-I then M opens a fresh module
3. Paste in the code and close the VBE window
4. The macro is available to run, and will be saved with the workbook.

Press ALT-F8 to display the list of available macros in your workbook.
If you are new to macros, these links may be helpful:
http://peltiertech.com/WordPress/200...e-elses-macro/
http://www.mvps.org/dmcritchie/excel/getstarted.htm

Hope this helps,

Hutch

"RENEE" wrote:

I have a worksheet sent to me with over 700 names on it. I need to put 4
extra lines under each name. Is there a way to do this without having to
individually insert those lines as this will take a long time. Thanks.