Document.Sections (Word)

Retorna uma coleção Section que representa as seções do 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.

For Each sec In ActiveDocument.Sections 
 sec.PageSetup.Orientation = wdOrientLandscape 
Next sec