Imprimer sur plusieurs pages, prendre toute la largeur

[LnV]

Bonjour,

Je dois imprimer un tableau excel auquel je ne dois apporter aucune modification.
Je veux imprimer sur 4 pages A3, et sur les deux premières les 9 premières colonnes, tandis que sur les pages 3 et 4 je veux imprimer les 30 colonnes suivantes.

Du coup, sur les pages 1 et 2, les tableaux ne prennent pas toute la largeur de la page (j'imprime en paysage).

Or je veux imprimer aussi gros que possible.

Pourriez-vous m'aider svp ?

Merci d'avance !

 

[wrndid]

Re : Imprimer sur plusieurs pages, prendre toute la largeur

bonjour
voici un model

With ActiveSheet.PageSetup
.PrintArea = "$A$1:$AG$9" 'de A1 a AG9 pour 30 $AG$30
.PrintHeadings = False
.PrintGridlines = False
.PrintComments = xlPrintNoComments
.PrintQuality = 600
.CenterHorizontally = True
.CenterVertically = True
.Orientation = xlLandscape
.PaperSize = xlPaperA3
.Zoom = False
.FitToPagesWide = 1
.FitToPagesTall = 1
End With

 

[LnV]

Re : Imprimer sur plusieurs pages, prendre toute la largeur

Merci !
Par contre, je tape cela où ?

Et une autre question : comment faire en deux fois, ce serait possible ?
Imprimer les pages 1 et 2 puis imprimer les 3 et 4 ?
Chez moi ca ne marche pas correctement, mais y a-t-il une solution ?