FrameSlides Property Example

This example prints the active presentation with a frame around each slide.

With ActivePresentation
    .PrintOptions.FrameSlides = True
    .PrintOut
End With