for each cell in selection
cell.formula = "+" & cells(2,cell.row).Address(0,0)
Next

--
Regards,
Tom Ogilvy

"snax500" wrote in message
oups.com...
In Excel2000, I have the following formulas:

A B c
1
2 +B2
3 +C2
4
5
6
7

I want to create a macro to select a range (say A4:A20) that will look
at the previous row's formula and add one column to column reference.
My output will then look like:

A B c
1
2 +B2
3 +C2
4 +D2
5 +E2
6 +F2
7 +G2
etc, etc.

Any ideas?

Thanks