Another option, with some warnings, might be a named formula.

ActiveWorkbook.Names.Add "Add1", "=R[-1]C+1"

Now, in A2, enter the formula : =Add1
and copy down.
Just don't copy the sheet, as this will cause errors.

--
Dana DeLouis
Win XP & Office 2003


"John Davies" wrote in message
...
If I have a column of cells, say A1 to A15 with the values of A1=1,
A2=A1+1,A3=A2+1 etc, then if I want to delete say row A6, row A7 will show
the #REF! error. Is there a way to delete the row without losing the
formula in the next row?