Scroll all open documents the same percentage as the active document
Article contributed by Bill Coan
Scroll the active document to the desired point, then run a macro that scrolls all other open documents to the same percentage.
The following code is written for Word 97. It looks at how far you've scrolled the active window, then scrolls all other document windows the same percentage. Of course, if one document is 10 pages long and another is 100 pages long, then a 50% vertical scroll would put you on page 5 in one document and page 50 in the other.
Sub ScrollAllWindowsALike()
Dim myWindow As
Window
Set myWindow = ActiveWindow
ScrollPercent = myWindow.VerticalPercentScrolled
For Each oWindow In
Application.Windows
oWindow.Activate
oWindow.VerticalPercentScrolled = ScrollPercent
Next oWindow
myWindow.Activate
End Sub