Document.Windows (Word)
Retorna uma coleção Windows que representa todas as janelas para o documento especificado. Somente leitura.
Para obter informações sobre como retornar um único membro de uma coleção, consulte retornando um objeto de uma coleção.
MsgBox Prompt:= ActiveDocument.Windows.Count & " window(s)", _
Title:= ActiveDocument.Name
ActiveDocument.ActiveWindow.NewWindow
MsgBox Prompt:= ActiveDocument.Windows.Count & " windows", _
Title:= ActiveDocument.Name