[Iska]

stuermer01, запустите макрорекордер и посмотрите, что выйдет. Например:

Код:

Sub Макрос1()
    Range("C6").Select
    ActiveCell.FormulaR1C1 = "=IF(R[-2]C[-2]<>"""",R[-2]C[3]-R[-2]C[-2],""--"")"
    Range("C6").Select
End Sub