该属性返回或设置垂直滚动条的位置占文档长度的百分比。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