PageSetup.Orientation (Word)

Devuelve o establece la orientación de la página. Posibles valores de retorno son wdOrientLandscape - Orientación horizontal, wdOrientPortrait - Orientación vertical.

Es podrán que algunas de las constantes WdOrientation no estén disponibles, según la compatibilidad con el idioma que haya seleccionado o instalado (por ejemplo, inglés, Estados Unidos).

Set myDoc = Documents("MyDocument.doc") 
With myDoc 
 .PageSetup.Orientation = wdOrientLandscape 
 .PrintOut 
 .PageSetup.Orientation = wdOrientPortrait 
End With