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