That's clever.

--
Regards,
Tom Ogilvy

Tim Zych wrote in message
...
Cells(cRow, 10).FormulaR1C1 = Cells(cRow - 1, 10).FormulaR1C1

is one way to do it.

As to which is the "best" way, it depends. PasteSpecial is very useful for
a
lot of formulas. For one offs, I prefer the above.