Bernie,

Perhaps I'm missing something, but just use something like

Range("B5").FormulaR1C1 = x



"bw" wrote in message
...
Sub R1C1Test()
Range("C5").Select
x = "=SUM(R[" & -4 & "]C:R[" & -1 & "]C)"
Selection.FormulaR1C1 = x
End Sub

This puts the formula "=SUM(C1:C4)" in Cell C5.

How do I modify this to put the same formula in Cell B5? A little
education please...

Thanks,
Bernie