Window.Panes (Word)

Retorna uma coleção panes que representa todos os painéis de janela da janela especificada.

Para obter informações sobre como retornar um único membro de uma coleção, consulte retornando um objeto de uma coleção.

If ActiveDocument.ActiveWindow.Panes.Count = 1 Then _ 
 ActiveDocument.ActiveWindow.Panes.Add