Récupérer le nom d'un shapeRésolu

Question

Bonjour,
j'essaye de faire une macro a propos d'un shape.
Lorsque je clique sur un shape,je voudrais une box qui me renvoie son nom (tel que je l'ai nommer dans excel),le but est de réutiliser ce nom dans la suite du code.
 voici un morceau de code que j'ai fait mais qui ne marche pas(il n'aime pas trop "selection.name",pas la bonne méthode surement mais je ne connais pas la bonne :/) : 

Sub Picture1_QuandClic()
 numéro_shape = Selection.Name
 msgbox numéro_shape
end sub


merci de votre aide

CTAC · Accepted Answer

Bonjour,

Sub Image1_Clic()
    MsgBox Application.Caller
End Sub


Cordialement

ctac

cs_Le Pivert · Answer

Bonjour,
J'ai cela mais ça te renvoie la shape que tu as sélectionnée avant de cliquer sur Picture1:

Sub Picture1_QuandClic()
Set myDocument = Worksheets(1)
   numéro_shape = Selection.Name
MsgBox myDocument.Shapes(numéro_shape).Name
End Sub


@+Le Pivert

ucfoutu · Answer

Bonjour,
Joli réflexe de CTAC 


________________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement vous dire ce qu'elle contient. Je n'interviendrai qu'en cas de nécessité de développer sur ses bases.

Gne99 · Answer

c'est exactement ce que je cherchais!!

Merci beaucoup !

Récupérer le nom d'un shape

4 réponses

Votre réponse

Discussions similaires