Macro

[Guest]

I have created a macro to delete a text box on click. I asigned that macro to
the text box. Nothing happens. I have the security set to low. What I want
is a text box to disipear when I click on it.

 

[Steve Rindsberg]

I have created a macro to delete a text box on click. I asigned that macro to
the text box. Nothing happens. I have the security set to low. What I want
is a text box to disipear when I click on it.

If you need help with macro code, always POST a working example of the code.

 

[Bill Dilworth]

Getting stuff to go away is easy with action settings.

Sub GoAway(oShp As Shape)
oShp.Visible = msoFalse
End Sub

Bringing it back is a bit more complicated, but still not difficult.


--
Bill Dilworth
A proud member of the Microsoft PPT MVP Team
Users helping fellow users.
http://billdilworth.mvps.org
-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
vestprog2@ Please read the PowerPoint FAQ pages.
yahoo. They answer most of our questions.
com www.pptfaq.com
..

 

[Steve Rindsberg]

Getting stuff to go away is easy with action settings.

Sub GoAway(oShp As Shape)
oShp.Visible = msoFalse
End Sub

Bringing it back is a bit more complicated, but still not difficult.

If you know where it is (ie, where to click a second time), it's as easy as
this:

Sub GoAwayAndComeBack(oShp As Shape)
oShp.Visible = Not oShp.Visible
End Sub

Then there's:

Sub GoAwayAndSTAYAway(oShp As Shape)
oShp.Delete
End Sub

or

Sub HowCanWeMissYouIfYouWontGoAway(oShp As Shape)
oShp.Visible = False
Sleep(5000)
oShp.Visible = True
End Sub


Life just doesn't get any geekier than this.

 

[Guest]

That did it!! Thank you.

If you need help with macro code, always POST a working example of the code.



-----------------------------------------
Steve Rindsberg, PPT MVP
PPT FAQ: www.pptfaq.com
PPTools: www.pptools.com
================================================

 

[Bill Dilworth]

Life just doesn't get any geekier than this.

The geek shall inherit the mirth.

 

[Steve Rindsberg]

The geek shall inherit the mirth.

Mirth? Dang. I thought the deal was *girth*!

 

[David M. Marcovitz]

Sub GoAwayAndComeBack(oShp As Shape)

oShp.Visible = Not oShp.Visible
End Sub

Hmm. How is this going to work? It will hide the shape on the first click,
but if the shape isn't visible, I don't think you can click on it even if
you "know where to click." I think you would need another shape to click on
to bring it back.
--David

--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.PowerfulPowerPoint.com/