[VBA] Application.Caller défectueux
yoyan25
Messages postés
4
Statut
Membre
-
Polux31 Messages postés 7219 Statut Membre -
Polux31 Messages postés 7219 Statut Membre -
Bonjour,
Je dispose d'un bouton (commandbutton) sur une feuille Excel 2003, j'aimerais que lorsque je clique dessus une msgbox apparaisse avec le nom du bouton.
J'ai essayé le code suivant :
Private Sub CommandButton1_Click()
MsgBox Application.Caller
End Sub
Cela me donne une erreur : incompatibilité de type
Y a t-il une erreur dans mon code ? Avez-vous une autre méthode ?
Merci d'avance
Je dispose d'un bouton (commandbutton) sur une feuille Excel 2003, j'aimerais que lorsque je clique dessus une msgbox apparaisse avec le nom du bouton.
J'ai essayé le code suivant :
Private Sub CommandButton1_Click()
MsgBox Application.Caller
End Sub
Cela me donne une erreur : incompatibilité de type
Y a t-il une erreur dans mon code ? Avez-vous une autre méthode ?
Merci d'avance
Configuration: Windows XP Internet Explorer 7.0
4 réponses
-
Private Sub CommandButton1_Click()
MsgBox CommandButton1.Name
End Sub -
Merci thev pour ta réponse, mais ce que je cherche en fait c'est d'obtenir : commandbutton1, donc je peut pas l'utiliser dans la fonction.
Tu as une autre idée ? -
-
Bonjour,
Ce que t'as donné Thev est correct. commandButton1.Name te bien le nom de ton contrôle commandButton.
Si tu veux obtenir l'intitulé, c'est à dire le texte qui apparait sur le bouton, il faut faire :
MsgBox commandButton1.Caption
