Document.Windows (Word)

Devuelve una colección Windows que representa todas las ventanas del documento especificado.

Para obtener información sobre cómo devolver un solo miembro de una colección, vea devolver un objeto de una colección.

MsgBox Prompt:= ActiveDocument.Windows.Count & " window(s)", _ 
 Title:= ActiveDocument.Name 
ActiveDocument.ActiveWindow.NewWindow 
MsgBox Prompt:= ActiveDocument.Windows.Count & " windows", _ 
 Title:= ActiveDocument.Name