ShowandReturn Property Example

This example sets the mouse click action for shape five on slide one in the active presentation to show the custom slide show named "techtalk." When the custom slide show is over, it automatically returns to the initiating presentation, in the state before the mouse click occurred.

With ActivePresentation.Slides(1).Shapes(5) _
        .ActionSettings(ppMouseClick)
    .Action = ppActionNamedSlideShow
    .SlideShowName = "techtalk"
    .ShowandReturn = msoTrue
End With