Userform, clic bouton

Bonjour,

J'ai cherché sur le forum, mais je ne trouve aucune problématique identique à la mienne :s

Je travaille présentement dans un userform (formulaire) avec deux labels (intitulés) et deux boutons. J'aimerais réalisé la séquence suivante:

Cliquer sur un label (choisir un des deux);

Cliquer sur un bouton;

Afficher le texte du bouton dans le label préalablement sélectionné.

Je suis bloqué

Merci

capture
27testvb.xlsm (12.79 Ko)

Bonsoir,

Exemple :

Dim ctrl As String

Private Sub CommandButton1_Click()
    On Error Resume Next
    Controls(ctrl).Caption = CommandButton1.Caption
    ctrl = ""
End Sub

Private Sub CommandButton2_Click()
    On Error Resume Next
    Controls(ctrl).Caption = CommandButton2.Caption
    ctrl = ""
End Sub

Private Sub Label1_Click()
    ctrl = "Label1"
End Sub

Private Sub Label2_Click()
    ctrl = "Label2"
End Sub

Cordialement.

Génial ça fonctionne! Un gros merci!

Rechercher des sujets similaires à "userform clic bouton"