Macro Buttons explanatory text?

[kyrgyzstanart]

Hello Gurus,

I have some VBA procedures in my workbook and assigned those to buttons in a worksheet. But it's cumbursome - for example, one button is called (the text within the rectangle shape) "Download Country Financial Forecast". Well, this is too long (knowing that I have a dozen of buttons). What I would like to do is to put an abreviation "DCFF" into the rectangle shape instead of the entire text; and when I put my cursor over that button I want to see in a pop-up (comment like) manner "Downlaod Country Financial Forecast" prompt text.

Just like in this forum when I put my mouse cursor over a topic name in the list of topics I see some text in a small pop-up window.

Does any one know how to do that?

Thanks a lot!

[Leith Ross]

Hello kyrgyzstanart,

Add a hyperlink to your shape and hyperlink to cell behind the shape. Set the screen tip to display what you want when the mouse moves on to the shape.

[kyrgyzstanart]

Hello kyrgyzstanart,

Add a hyperlink to your shape and hyperlink to cell behind the shape. Set the screen tip to display what you want when the mouse moves on to the shape.

Hello Leith Ross,

Thank you for the tip, but it doesn't work. When the button gets a hyperlink - when I click on the button it doesn't run the macro assigned to it but simply sends to the cell "behind the shape.

Here is what I found at http://excel.tips.net/Pages/T003294_..._an_Image.html

"You might at first think that you could add a ScreenTip to the image, but that can only be done if you assign a hyperlink to it. Adding the hyperlink (and ScreenTip) is easy enough, but you'll find that the hyperlink takes precedence over the macro, stopping it from being run."

But their way is not the most streight forward, I was wondering if somebody on the forum has done something like this.

Please, advise.

[davesexcel]

Try it out, tell us how it goes.

Another option could be a Hyperlink Macro,
http://www.excelforum.com/excel-prog...-question.html

Click Here for an Example

[Cutter]

Another option would be to add a small shape (like a circle with a question mark in it) on top of your "button" and assign the hyperlink / screen tip to that. Hovering over the smaller shape gives the text you want in the pop-up but the larger shape is still available for clicking and running your macro.

[rwgrietveld]

What you could use is the Comment of the Cell beneath.

Private Sub CommandButton1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

Static busy As Boolean

If busy = False Then
  busy = True
  If X > 10 And X < 40 And Y > 10 And Y < 40 Then
    Call Module1.SetComment(CommandButton1.TopLeftCell, 1) 'On
  Else
    Call Module1.SetComment(CommandButton1.TopLeftCell, 0) 'Off
  End If
  busy = False
End If

End Sub

and in Module1

Sub SetComment(MyCell As Range, OnOff As Integer)
    If MyCell.Comment Is Nothing Then
      MyCell.AddComment
      MyCell.Comment.Text Text:="Show this text"
    Else
      MyCell.Comment.Text Text:="Show this text"
    End If
    
    If OnOff = 0 Then 'Off
      MyCell.Comment.Visible = False
    ElseIf OnOff = 1 Then
      MyCell.Comment.Visible = True
    End If

End Sub

see My atachement and hoover over CB1.