Pane.Next (Word)

Returns a Pane object that represents the next document pane in the collection.

Dim panNext As Pane
Set panNext = ActiveWindow.ActivePane.Next