Command Button Code to End/Exit a SlideShow

  • Thread starter Thread starter Barb
  • Start date Start date
B

Barb

I have a command button on the Slide Master to "END" the
show. The code is:

Private Sub cmdEnd_Click()

SlideShowWindows(Index:=1).View.Exit

End Sub

When running the slide show, this code exits, but also
asks if the changes should be saved or not (I believe due
to hyperlinks that change color when a navigation
selection is made in the interactive presentation).

Any suggestions to the code to bypass the request to save
when exiting?

Thanks!!!
 
Barb,

Try adding this to your code:

ActivePresentation.Saved = True

I didn't try it but 'I think' it should work....
 
I have a command button on the Slide Master to "END" the
show. The code is:

Private Sub cmdEnd_Click()
Click to expand...

Try adding:

ActivePresentation.Saved = msoTrue
SlideShowWindows(Index:=1).View.Exit

End Sub
Click to expand...

But why not just use an End Show action setting instead of VBA?
 
Back
Top