Discussion :

[malabarbe]

Bonjour,

Comment par macro,mettre l'imprimante par défaut
en mode paysage ?

Merci à vous

[maxxgraph]

Bonjour Malabarbe

SI tu essais de parametrer avec l'object Orientation ??

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
Printer.Orientation = 2
'Definition de l'imprimante en mode paysage

Bonne journée

[malabarbe]

Désolé, cela ne tourne pas

[Trust]

Bonjour Malabarbe,

Essaie avec ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.PageSetup.Orientation = xlLandscape

[malabarbe]

Non, aucun code tourne
Erreur a la compilation

et rien dans l'aide d'Excel !

[Godzestla]

Bonjour,
As tu associé cette commande à la feuille que tu veux imprimer ?

Exemple trouvé dans l'aide de VBA avec PageSetup


Using the PageSetup Object
Use the PageSetup property to return a PageSetup object. The following example sets the orientation to landscape mode and then prints the worksheet.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
With Worksheets("Sheet1")
    .PageSetup.Orientation = xlLandscape
    .PrintOut
End With

[malabarbe]

Bonjour,

Exact, je n'avais pas précisé de feuille

Merci pour votre aide

@ +