Connaître l'intitulé d'un bouton dans une feuille Excel.

[Mjgreg67]

Bonjour le forum,

J'aurai voulu savoir s'il était possible de connaitre l'intitulé d'un bouton provenant des contrôles de formulaire ?

Je connais la formule pour connaitre son nom mais pas son intitulé.

Exemple j'ai un bouton alpha que je nomme "Bouton_1" et je lui donne comme intitulé : Test.
Je souhaiterai que lorsque je clique sur ce bouton dans la cellule A1 il y ait marqué "Test" et non pas "Bouton_1".
Existe t'il une formule pour cela ?

Ci-joint un fichier exemple avec la formule pour connaître son nom... (Utilisation de application.caller)

P.S : Les codes du types [A1] = "Test" ne me seront pas utiles du fait que l'intitulé du bouton est susceptible de changer :s...

Merci beaucoup pour votre aide !

 

[Dranreb]

Re : Connaître l'intitulé d'un bouton dans une feuille Excel.

Bonjour.

Sub Bouton()
ActiveSheet.[A1] = ActiveSheet.Shapes(Application.Caller).TextFrame.Characters.Text
End Sub

 

[Mjgreg67]

Re : Connaître l'intitulé d'un bouton dans une feuille Excel.

Un code que je garderai précieusement ! Merci beaucoup à vous