Bonjour,
J'ai plusieurs tableaux que je souhaiterais imprimer. Pour ce faire, j'ai défini des zones d'impression, les orientations et les tailles de papier, mais j'aimerais rajouter un petit plus, c'est-à-dire :
1) désactiver la fonctionnalité "Ajuster la feuille à une page"
2) au besoin et suivant la taille de mon tableau (j'en ai des costauds !), activer la fonctionnalité "Ajuster la feuille à une page".
Je mets ci-dessous mon script en VBA et j'adresse déjà un tout grand MERCI à la personne qui me viendra en aide.
En attendant, une toute belle fin de journée et un beau week-end.
Cordialement !
Frangil
Sub ILR_RoT()
ActiveSheet.PageSetup.PrintArea = "$A$37:$R$83"
With ActiveSheet.PageSetup
.Orientation = xlLandscape
.PaperSize = xlPaperA4
End With
ActiveSheet.PrintPreview
End Sub