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