Adjusts the size of the specified document window to accommodate the information that's currently displayed.
expression.FitToPage
expression Required. An expression that returns a DocumentWindow object.
Example
This example exits the current slide show, sets the view in the active window to slide view, sets the zoom to 25 percent, and adjusts the size of the window to fit the slide displayed there.
Application.SlideShowWindows(1).View.Exit
With Application.ActiveWindow
.ViewType = ppViewSlide
.View.Zoom = 25
.FitToPage
End With