Danny,

I posted some code some time back to add tooltips to ACtiveX controls. You
should be able to adapt it to shapes

You can find it on Google at http://tinyurl.com/kktm


--

HTH

Bob Phillips

"Danny Sowden" wrote in message
...
I have built a spreadsheet where by when the user clicks
on a picture a macro runs which displays some data. Is
there any way I can get the picture to have some Control
Tip Text on it when the user puts the mouse over it? I
want this to work in a similar way to the Alt tags on
pictures on websites. Can i do this within the Macro, my
current macro code is -

Sub Picture98_Click()
UserForm1.ListBox1.RowSource = "203!S1:T23"
UserForm1.Show
End Sub

Where would i add the control tip text code???

Thanks Bob, but this is a little complex for my limited
knowledge. Is there not a simple way similar to when you
apply a hyperlink and have a screen tip to a picture? The
pictures run the macro when clicked, but i just want a
mouse over bit of text to appear letting the user know to
click the picture

-----Original Message-----
Danny,

I posted some code some time back to add tooltips to
ACtiveX controls. You
should be able to adapt it to shapes

You can find it on Google at http://tinyurl.com/kktm


--

HTH

Bob Phillips

"Danny Sowden" wrote in message
...
I have built a spreadsheet where by when the user clicks
on a picture a macro runs which displays some data. Is
there any way I can get the picture to have some Control
Tip Text on it when the user puts the mouse over it? I
want this to work in a similar way to the Alt tags on
pictures on websites. Can i do this within the Macro, my
current macro code is -

Sub Picture98_Click()
UserForm1.ListBox1.RowSource = "203!S1:T23"
UserForm1.Show
End Sub

Where would i add the control tip text code???


.