Finding name of shape that was last clicked - Application.Caller

H

hutteto

Hey,

I have some shapes on a worksheet. Each shape contains a hyperlink,
however in addition to the hyperlink being clicked, for certain shapes
I need a userform to also appear when the shape is clicked. I tried
to assign a macro which DOES not work if the hyperlink is still
assinged. However if I delete the hyperlink then the macro will
work. Then I am able to use Application.Caller and figure out the
name of the shape that called the macro. Well this will not work
because I need the hyperlink to still work.

because of this, I tried to set the hyperlink to a cell address on the
worksheet and then use the Worksheet_SelectionChange event to run the
Application. Caller macro when that cell is selected, however then I
get error 2023.

How can I accomplish what I need?

Thanks
 
J

Jim Cone

Assign code to the Shape that does both: goes somewhere and displays the Userform.
'---
Sub DoItForMe()
With ThisWorkbook.Worksheets("Sheet2")
.Select
.Range("C20").Select
End With
UserForm1.Show
End Sub
--
Jim Cone
Portland, Oregon USA .
http://www.mediafire.com/PrimitiveSoftware .
(Extras for Excel add-in: convenience built-in)





"hutteto" <[email protected]>
wrote in message
news:98bd26bf-8e36-48a2-bab8-efbe193f6d6d@v11g2000prb.googlegroups.com...
 
H

hutteto

How do I assign code to it? I tried assigning a macro but if you have
a hyperlink, the hyperlink will override the assigned macro and the
assigned macro will never run when you click the shape. The only
thing that runs is the hyperlink, not the assigned macro.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

AddPicturesToShapes 0
Visio: copy text of a master shape to User-define Cells (Variable) 0
Visio shape text disappears upon copy paste 1
Mass-remove hyperlinks from Publisher Document (VBA macro) 0
Hyperlink Cell to Shape on seperate worksheets 3
Page relative locations of shapes. 1
Accurate Detection of Graphic Area of Shape Object 0
What Shape was Clicked ? 2

Top