Cumul de valeur en meme cellule en excel2007

bonjour

d abord je remercier tte personne a la volonté d aider l autre c deja une grande valeur en lui

mon probleme que j espere que vous m aider dans sa resolution c que j arrive pas a trouver une fonction qui donne la cumulation d une valeur ancienne avec la nouvelle saisie en meme cellule sous excel

par exmple dasn la cellule A1 J AI SAISI HIER 100 AUJOURD HUI J AI UNE NOUVELLE VALEUR A ADDITIONNER EN MEME CELLULE DE 40 JE VOUDRAI QUAND J EFFACE LA VALEUR 100 ET JE TAPE 40 EN MEME CELLULE ME DONNE VALEUR DE 140 ET MERCI D AVANCE

Bonjour le forum,

Option Explicit
Dim Valeur

Private Sub Worksheet_Change(ByVal Target As Range)
       Application.EnableEvents = False
       If Target.Column = 1 And Target.Row > 1 Then
              Target.Value = Target.Value + Valeur
       End If
       Application.EnableEvents = True
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
       Valeur = Target.Value
End Sub

mbbp