A laphoz kell rendelned a makrót.

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column = 3 Then
        Rows(Target.Row - 1).Copy
        Range("A" & Target.Row - 1).Select
        Selection.PasteSpecial Paste:=xlValues
        Application.CutCopyMode = False
    End If
End Sub

Belegondolva, hogy előbb azt kérted, másolja az Excel önállóan a képleteket is, utólagos engedelmeddel úgy írtam meg, hogy mikor a C oszlopba beírsz egy értéket, az előző sor képleteit illeszti be értékként a helyükre. Ha a beírás sorát íratnám felül az értékekkel, elvesznek a másolandó képleteid. :)

Ha mégis az aktuálist sort akarod felülíratni, két helyen vedd ki a -1-et.