Returns or sets the horizontal scroll position as a percentage of the document width. Read/write Long.
This example displays the percentage that the active window is scrolled horizontally.
MsgBox _ ActiveDocument.ActiveWindow.HorizontalPercentScrolled & "%"
This example vertically scrolls the active pane of the window for Document1 all the way to the left.
With Windows("Document1") .Activate .ActivePane.HorizontalPercentScrolled = 0 End With