macro impression 2 sens

Le
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.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
FFO
Le #18752121
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 !!!!
Domi
Le #18759501
Merci,
Ca marche bien.
Domi

"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 !!!!



Publicité
Poster une réponse
Anonyme