Zoom 属性

       

该属性返回一个 Zoom 对象,该对象代表指定视图的显示比例。

expression.Zoom

expression   必需。该表达式返回一个 View 对象。

示例

本示例将所有打开窗口的显示比例更改为 125%。

Sub wndBig()
    Dim wndBig As Window

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

本示例改变活动窗口的显示比例,以显示文本的全部宽度。

ActiveDocument.ActiveWindow.View.Zoom.PageFit = wdPageFitBestFit