Document.ActiveWindow (Word)
Gibt ein Window -Objekt zurück, das das aktive Fenster (das Fenster mit dem Fokus) darstellt.
Wenn keine Fenster geöffnet sind, wird beim Verwenden der ActiveWindow-Eigenschaft ein Fehler generiert.
Sub WindowCaption()
MsgBox ActiveDocument.ActiveWindow.Caption
End Sub