Calcul sur une même cellule

Bonjour,
Sur mon tableau en copie, je souhaite faire un calcul sur une seule cellule. Avec comme référence C3=0, je tape +2 en C3, il va afficher 2. je tape +3 donc C3=5.
En fouillant, j'ai trouvé ce code. Or, il ne fonctionne que sur A1. Je souhaite qu'il calcule pour chaque cellule de C3 à C16. Merci à vous.

je joins le code

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
Application.EnableEvents = False
If [mémo] <> "" Then
Target = Target + [mémo]
End If
Application.EnableEvents = True
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
ActiveWorkbook.Names.Add Name:="mémo", RefersToR1C1:="=" & Chr(34) & Target.Value & Chr(34)
End If
End Sub