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