Command Button Code to End/Exit a SlideShow

[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!!!

 

[Charles Maxson]

Barb,

Try adding this to your code:

ActivePresentation.Saved = True

I didn't try it but 'I think' it should work....

 

[Steve Rindsberg]

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

Private Sub cmdEnd_Click()

Try adding:

ActivePresentation.Saved = msoTrue

SlideShowWindows(Index:=1).View.Exit

End Sub

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