RangeType Property Example

This example prints the current slide the active presentation.

With ActivePresentation
    .PrintOptions.RangeType = ppPrintCurrent
    .PrintOut
End With

This example runs the named slide show "Quick Show."

With ActivePresentation.SlideShowSettings
    .RangeType = ppShowNamedSlideShow
    .SlideShowName = "Quick Show"
    .Run
End With