Hi Alex,

Range("B1").FormulaR1C1 = "=R[" & x+1 & "]C"

--
Kind regards,

Niek Otten
Microsoft MVP - Excel


"Alex R" <Alex wrote in message ...
|I am trying to create a formula in a cell to set the value of the cell equal
| to another cell that is a varible number of cells away.
|
| for example
| Dim x As Integer
| x = 4
| Range("B1").FormulaR1C1 = "=R[x+1]C"
|