Retrouver l'index d'un objet

Bonsoir tout le monde,

question de théorie facile (pour certains!) dont je ne trouve pas la réponse!

Sur une feuille, j'ai quelques CommandButton que j'indexe (vieille habitude VB), par exemple, CmdXXX1, CmdXXX2, CmdXXX3.

Encore qu'en VB, c'est encore plus pratique car c'est vraiment un index, CmdXXX(1), ce qui facilite grandement les choses.

Question : comment peut-on calculer l'index du CmdXXX qui a été cliqué ?

J'ai démarré ainsi en essayant de capturer un chiffre correspondant figurant sur le bouton (caption) mais, même si ça ne plante pas, ça ne donne pas de résultat!

For x = 1 To 8
    If Left$(Worksheets("Feuil1").OLEObjects("CmdXXX" & x).Object.Caption, 1) = Str(x) Then

Merci pour vos lumières!

Bonne soirée!

C'est une mission pour application.caller!

Bonne soirée

Pierre

Bonsoir Pierre,

merci pour cet indice!

Je vais creuser dans cette direction pour commencer!

A+