Window.Document (Word)

Gibt ein Document -Objekt zurück, das dem angegebenen Bereich, Fenster oder der angegebenen Auswahl zugeordnet ist.

Set myDoc = Application.ActiveWindow.Document 
If Windows.Count >= 2 Then 
 Application.ActiveWindow.Next.Activate 
 Application.ActiveWindow.Split = True 
 myDoc.Activate 
End If