Bonjour,

Le code suivant ne sélectionne pas ma zone d'impression définie par "Plage_Impression". Je souhaite que mon tableau s'imprime sur une page (cf. FitToPages) en fonction de cette plage définie.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
With ActiveSheet.PageSetup
        .PrintArea = Plage_Impression
        .CenterHorizontally = True
        .CenterVertically = True
        .Orientation = xlLandscape
        .FitToPagesWide = 1
        .FitToPagesTall = 1
        .Zoom = 140 'True
    End With
Je tourne en rond. Je crains que vous me disiez que l'erreur de mon code est évidente mais elle m'échappe.
Merci d'avance pour vos lumières,
Cdt