Cumule cellules

Résolu/Fermé
mic6259 Messages postés 342 Date d'inscription mercredi 4 mars 2015 Statut Membre Dernière intervention 11 décembre 2023 - Modifié le 25 janv. 2020 à 08:24
mic6259 Messages postés 342 Date d'inscription mercredi 4 mars 2015 Statut Membre Dernière intervention 11 décembre 2023 - 25 janv. 2020 à 10:50
Bonjour,
D'après le fichier joint, en A1 on modifie la valeur et le cumule ce fait dans la cellule A2 en VBA.
Serait-il possible de faire la même chose dans les cellules B1 et B2
Je vous remercie beaucoup

https://cjoint.com/c/JAzhnpPyqt8

1 réponse

M-12 Messages postés 1331 Date d'inscription lundi 22 septembre 2008 Statut Membre Dernière intervention 8 avril 2023 283
25 janv. 2020 à 08:33
Bonjour,
tu rajoutes
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$A$1" Then
      Range("A2").Value = Range("A2").Value + Target.Value
    End If
    If Target.Address = "$B$1" Then
      Range("B2").Value = Range("B2").Value + Target.Value
    End If
End Sub
1
mic6259 Messages postés 342 Date d'inscription mercredi 4 mars 2015 Statut Membre Dernière intervention 11 décembre 2023 1
25 janv. 2020 à 10:50
Super çà fonctionne parfaitement
Merci beaucoup M-12
cordialement
0