Discussion :

[Hellstyx]

Bonjour à tous,

Malgré mes recherches je n'ai pas trouvé de solution à mon problème ... Et je débute.

J'ai un userform contenant 20 boutons. J'ai affecté à ces 20 boutons la même macro (ce qui multiplie les lignes de programme car j'ai déclaré 20 fois la même macro).

Je voudrais déclarer dans mon programme le fait que lorsque je clique sur n'importe quel bouton de mon userform, je lance une macro; cela me permettrait de rajouter des boutons facilement et de supprimer un bon nombre de lignes.

Merci.

[pc75]

Bonjour,

Tu doit t'en sortir en créant un tableau de boutons.

[DAUDET78]

Tu doit t'en sortir en créant un tableau de boutons.

Plus exactement en affectant un index (de 0 à 19) à chaque bouton (dans les propriétés. Ce qui se fait facilement en faisant un Ctrl+C pour copier le bouton et un Ctrl+V pour créer un nouveau bouton).
Une action sur un bouton donne alors un événement (par exemple pour le click):

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Bouton_Click(Index As Integer)
' Ici le programme exécuté pour tous les boutons
Select Case Index
    Case 0
       ' Programme pour le bouton 0
    Case 1
       ' Programme pour le bouton 1
' ................
    Case 19
       ' Programme pour le bouton 19
End Select
End Sub