Cursor over text

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Can I make text appear only when the cursor is over it? I tried to use Action
Button :Help and Action Button :Information but I cannot get these to work. I
am using PowerPoint 2000.
 
Jason1953 said:
Can I make text appear only when the cursor is over it? I tried to use Action
Button :Help and Action Button :Information but I cannot get these to work. I
am using PowerPoint 2000.
Click to expand...

If you'll be running the presentation inside PPT (and not the viewer) you could
set the shape's MouseOver action setting to Run Macro: Peekaboo

Then add this in the VBA editor:

Sub Peekaboo(oShp as Shape)
With oShp.TextFrame.TextRange
' If the there's no text, add this:
If .Text = "" Then
.Text = "PEEKABOO! I see YOU!"
Else
' blank the text that was there
.Text = ""
End If
End With
End Sub

When you mouse over the shape, the text will appear. Mouseover again and it
goes away.
 
And now, a better version here:

Use VBA to make text appear and disappear
http://www.rdpslides.com/pptfaq/FAQ00662.htm

This version picks up the text already on the shape and hides it on the first
mouseover, brings it back on the next mouseover.

That removes the need to edit the macro, and also means that one macro can handle
however many shapes you want it to. No need to create a different macro for each
shape. Much more useful.
 
Back
Top