Cumule de valeurs saisie journellement

kerscouet Messages postés 16 Date d'inscription   Statut Membre Dernière intervention   -  
M-12 Messages postés 1332 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Dans une feuille de calcul excel, je saisie dans A1 la valeur 10 aujourd'hui, 10 apparaît dans B2.
Demain, je saisie dans A1 la valeur 5, dans B2 apparaît 15 (10+5)
Après demain, je saisie dans A1 la valeur 8, dans B2 apparaît 23 (10+5+8)
Et ainsi de suite, tous les jours du mois.
Comment est-ce possible.
Merci



A voir également:

3 réponses

M-12 Messages postés 1332 Date d'inscription   Statut Membre Dernière intervention   285
 
Bonjour
Une macro à mettre dans la feuille concernée

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Temp
Application.EnableEvents = False
If Not Application.Intersect(Target, Range("A1")) Is Nothing Then
Range("B2") = Range("B2") + Range("A1")
Range("A1") = ""
End If
Application.EnableEvents = True
End Sub
0
Mairys71 Messages postés 3 Date d'inscription   Statut Membre Dernière intervention  
 
merci mais cela ne marche pas, je ne dois pas faire ce qu'il faut
cordialement
0
Raymond PENTIER Messages postés 58990 Date d'inscription   Statut Contributeur Dernière intervention   17 354
 
... et comme je ne pratique pas VBA, j'évite de saisir les différentes données dans une même cellule, puisque j'ai la chance d'avoir une version récente d'Excel qui accepte des millions de cellules ! Donc je saisis 10 en A2, 5 en A3, 8 en A4 ... jusqu'en A32.
Et en A1 j'ai ma formule =SOMME(A2:A32)
Pourquoi faire compliqué quand on peut faire simple ? 
0
M-12 Messages postés 1332 Date d'inscription   Statut Membre Dernière intervention   285
 
Bonjour,

Avec un classeur exemple
https://www.cjoint.com/c/HGeeSlsfV2B
0