View.Zoom

Property Zoom As Double

Member of View

The Zoom property returns or specifies the magnification level for a view.

•

The Zoom property of a custom view is applicable only if the View.UseZoom property of the view is set to True.

The following VBA example increases the zoom level by 50 for each view in the collection. The zoom level is set at 100 for the first view.

Sub Test()

Dim Vw As View

Dim VwCollection As Views

Dim intCounter As Integer

Set VwCollection = ActiveDocument.Views

intCounter = 1

For Each Vw In VwCollection

intCounter = intCounter + 1

Vw.Zoom = CDbl(intCounter * 50)

Next Vw

Set Vw = Nothing

Set VwCollection = Nothing

End Sub