Zoom Property

Returns a Zoom object that represents the magnification for the specified view.

expression   Required. An expression that returns one of a View object.

Example

This example changes the zoom percentage of each open window to 125 percent.

Sub wndBig()
    Dim wndBig As Window

    For Each wndBig In Windows
        wndBig.View.Zoom.Percentage = 125
    Next wndBig
End Sub

This example changes the zoom percentage of the active window so that the entire width of the text is visible.

ActiveDocument.ActiveWindow.View.Zoom.PageFit = wdPageFitBestFit