Bonjour,
Tout dépend de ce que tu veux précisément. Si tu passes par l'enregistreur, évidement toutes les instructions de mise en page sont de fait enregistrées. Il faut donc nettoyer ta macro.
Voici un code ultra simple
Sub Macro()
With ActiveDocument.PageSetup
.Orientation = wdOrientLandscape
End With
End Sub
Bon courage