VBA Coding in PPT (2003)

Topic

New Reply

On the slide I have an image of a program. I have over layed many text boxes on the image that are alligned with various data entry fields on the program. I have added a text box field at the bottom of the slide. What I am trying to do is find some way so that as users hover over one of the text boxes that are on the image the text box at the bottom of the screen is updated with comments specific to that field. I have everything working except for setting the text in the textbox at the bottom of teh slide to some value. How would I dynamically change the code in a text box on a slside via a macro or sub/function?

And if anyone has a better idea on how to achieve this using a different method then I am working please share your thoughts.

Thanks
Ed

Reply | Quote

Replies

I’m not sure of the best way to do this, but if you assign tags to your different shapes, you should be able to use code similar to the attached. If you import this module (change the file name back to .bas) does it work? Please make a backup first.

Reply | Quote

Ed,

Have you thought about using the “visible” technique in VBA?

You could have all the text objects on the slide, then by making them all invisible, until you click the relevant text box above, then make the correct text box visible for each whatever the user clicked (that triggers the macro).

With ActivePresentation.SlideShowWindow.Presentation.Slides(“YourName”)
.Shapes(“YourObjectName”).Visible = False

With ActivePresentation.SlideShowWindow.Presentation.Slides(“YourName”)
.Shapes(“YourObjectName”).Visible = True

Cheers

Reply | Quote