VerticalPercentScrolled 属性

       

该属性返回或设置垂直滚动条的位置占文档长度的百分比。Long 类型,可读写。

expression.VerticalPercentScrolled

expression   必需。该表达式返回“应用于”列表中的一个对象。

示例

本示例显示活动窗口垂直滚动的百分比。

MsgBox ActiveDocument.ActiveWindow.VerticalPercentScrolled & "%"

本示例将活动窗口垂直滚动 10%。

Set aWindow = ActiveDocument.ActiveWindow
aWindow.VerticalPercentScrolled = _
    aWindow.VerticalPercentScrolled + 10

本示例将 Document1 窗口的活动窗格垂直滚动到文本结尾处。

With Windows("Document1")
    .Activate
    .ActivePane.VerticalPercentScrolled = 100
End With