That worked thanks a million.

Just one other thing, in some of the inserted rows the comments will be the
same, is there any format of a macro that could also be used to insert text
only in the second inserted lines as was inputted from the macro below to
save time in typing it into every line??

"Gary''s Student" wrote:

run this small macro:

Sub routine()
Set r = ActiveSheet.UsedRange
nlastrow = r.Rows.Count + r.Row - 1
For i = nlastrow To 1 Step -1
Cells(i, 1).Select
Selection.EntireRow.Insert
Next
End Sub

--
Gary''s Student - gsnu200752


"LittleAnn" wrote:

HI

I have a large excel sheet which runs into about 1,000 lines with various
information in relation to figures and peoples jobs. My problem is that I
need to insert an extra row after each individual row to insert comments and
furhter information that relate to the line above it, is there a faster way
of completing this without having to go through each individual line.