Cumul Fermé

Question

Bonjour, 
Je souhaite faire un cumul de toutes les valeurs que je saisi  dans une cellule, dans une autre cellule.
Ex: si j'ai A1= 5, B1 me donne 5,ensuite quand je saisi 6 en A1 je souhaite avoir B1=11 .
Comment cela pourrait marcher ? 
Merci d'avance pour vos réponses 


Configuration: Android / Chrome 55.0.2883.91

Vaucluse · Answer

Bonjour
si vous êtes en Excel, il faut passer par VBA
une option ici:
voyez avec:
clic droit sur le nom d'onglet "feuil1"
et "visualiser le code"
cette option ajouta la valeur de A à la cellule B en ligne pour toute la colonne A
crdlmnt
https://mon-partage.fr/f/69t4yitn/

Jauster · Answer

Bonjour,

Code à intégrer dans la feuille de calcul que vous souhaitez utiliser et non dans un module :
- Alt + F11 > Double-clic sur le nom de votre feuille à gauche (en jaune ) > et copier/collez le code suivant 

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address <> "$A$1" Or Target.Cells.Count > 1 Then Exit Sub
If IsEmpty(Target) Then Exit Sub

If IsNumeric(Target.Value) = False Then
            Application.EnableEvents = False
        Application.Undo
            Application.EnableEvents = True
        
        MsgBox "Merci d'utiliser des valeurs numériques uniquement", _
        vbExclamation, _
        "Erreur colonne A"
        Exit Sub
    End If

Dim OldVal As Double, NewVal As Double

NewVal = Target.Value

Application.EnableEvents = False
OldVal = Target.Offset(0, 1).Value
Target.Offset(0, 1).Value = OldVal + NewVal
    Application.EnableEvents = True

End Sub


Lorsque la valeur de A1 change, elle est additionnée à B1. Pour repartir à 0 il faut juste supprimer la valeur de B1

Cumul

2 réponses

Discussions similaires