Window.Next (Word)

Retorna a próxima janela de documento na coleção de janelas de documento abertas. Somente leitura.

If Windows.Count > 1 Then ActiveDocument.ActiveWindow.Next.Activate