PageSetup Property Example

The following example sets the slide size and slide orientation for the presentation named "Pres1."

With Presentations("pres1").PageSetup
    .SlideSize = ppSlideSize35MM
    .SlideOrientation = msoOrientationHorizontal
End With