Bonjour, depuis quelques heures je suis bloqué sur ce code. Je n'arrive pas à automatiquement incrémenter "+1" à la variable "A" lorsque je clique sur le bouton "Addition". En somme, je souhaiterai que si j'appuie sur le bouton "Addition" n-fois, ma "Test2.Caption" soit égale à "A + n"

Ceci est un code à part, car il ferait partie intégrante d'un code beaucoup plus long.

Merci Beaucoup de votre aide ! (J'ai testé avec le "A=A+1" dans le PS Addition_Click, ça ne change rien.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Dim A As Integer
Private Sub Addition_Click()
    Unload UserForm2
    UserForm2.Show
    A = A + 1
End Sub
Private Sub Test_Click()
    Test2.Caption = A
End Sub
Private Sub UserForm_Initialize()
    A = 1
End Sub