using OnLoad for a slide in Powerpoint (2003)?

[riddle171]

I have a label that changes per some hotspots I put in. I want a label
to reset either after the person moves on to the next slide or before
the slide loads.

Problem is I programmed the hotspots to change the caption but when the
person goes to the next slide the caption stays on the last one used.
I want to have it blank when the user enters that slide.

I can write some code (I am not very good at all) so that it will reset
the label when the slide loads?

-Stoss

 

[riddle171]

Labels are in the 'Control Toolbox'.

'Hotspots' are when you take a rectangle box place it around something
(borders = nothing (i.e. Invisible)) and place it over a place on the
slide. Example: let's say I have a photograph of a farm. I could take
a rectangle box and put it around a barn. Then, I would create a macro
and launch the macro when the person either mouseovers or clicks that
barn (actually they would be clicking the rec. box) using the 'Action
Settings'. Then, having a label say, "This is the little red barn"
(the programmed macro changes the caption). I know, dumb analogy

However, using this example, if I go to the next slide2 the caption in
the label (slide1) will state, "This is the little red barn" the next
time you open and go to that slide.

I can do what I want from a previous slide. In other words, what you
said before about thinking about what you click before you get to the
slide. If I want to reset some values (labels) in slide 2, I could set
it to do that from slide 1. If this way is possible, I could do that
in my PPT. However, I just don't know how

Any help would be great!
-Stoss

 

[riddle171]

Thanks so much for your help. You pointed me in the right direction.

Basically, this is what I did..... I created a start button on the
first slide to start the slide show.

(I really stink at coding so just laugh behind my back LOL)

Private Sub cmdStart_Click()
With ActivePresentation.Slides(19).Shapes("lblPFDInfoBox")
Slide20.lblPFDInfoBox.Caption = ""
Slide20.lblPFDInfoBox.Visible = False
End With
With ActivePresentation.Slides(7).Shapes("lblControlPanel")
Slide8.lblControlPanel.Visible = True
Slide8.lblControlPanel.Caption = "Please mouseover any control
for more information."

'I didn't know how to run this next line of code by itself so I stuck
it here to run since these lines where running anyway. It didn't seem
to want to run outside of the With statement. I know this is horible
code, I am a flight instructor, not a coder.
'This code take you to slide 2 in my PPT
ActivePresentation.SlideShowWindow.View.Next
End With
End Sub

At any rate, you kind of lost me a little bit with the code you wrote
down. I mean, I pretty much can read and understand the code but I am
not sure what the end goal was.

Anyway, you have been a HUGE help. I have learned a little more about
powerpoint. I am a little surprised at MS for making powerpoint as
difficult to work with as it is. Just knowing other MS programs,
trying to customize PPT with VBA has been a lot harder than any other
program.

Oh, BTW: the code that I did got me to the point that everything works
exactly how I want it to. I know it isn't pretty but I don't have the
time to really dig down to understand and make it pretty, nice code.

Thanks again!!!!!!
If you ever want flying lessons, just let me know (I'll still
charge you, I will just be extra nice to ya!!!!! LOL)
-Stoss