Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

macro impression 2 sens

2 réponses
Avatar
Domi
Bonjour à tous,
Est-il possible via une petite macro d'imprimer la page 1 d'un onglet en
format Portrait et ensuite la page 2 en format Paysage ?
Merci pour le coup de main.

2 réponses

Avatar
FFO
Salut à toi

Ce bout de code devrait faire :

With ActiveSheet.PageSetup
.Orientation = xlPortrait
End With
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate _
:=True
With ActiveSheet.PageSetup
.Orientation = xlLandscape
End With
ActiveWindow.SelectedSheets.PrintOut From:=2, To:=2, Copies:=1, Collate _
:=True

Dis moi !!!!
Avatar
Domi
Merci,
Ca marche bien.
Domi

"FFO" a écrit dans le message de news:

Salut à toi

Ce bout de code devrait faire :

With ActiveSheet.PageSetup
.Orientation = xlPortrait
End With
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Collate
_
:=True
With ActiveSheet.PageSetup
.Orientation = xlLandscape
End With
ActiveWindow.SelectedSheets.PrintOut From:=2, To:=2, Copies:=1, Collate
_
:=True

Dis moi !!!!