Microsoft 365 Impression en pdf sans les marges

Phil69970 à dit:

Bonjour @membsa

Je te propose ceci avec les paramètres d'impression à choisir

VB:

'La procédure impression ....
With Sheets("Ma feuille").PageSetup ' à adapter'
    .LeftMargin = Application.InchesToPoints(0.8) 'Marge gauche à adapter
    .RightMargin = Application.InchesToPoints(0.1)  'Marge droite à adapter
    .TopMargin = Application.InchesToPoints(0.8) 'Marge haut de page ou top à adapter
    .BottomMargin = Application.InchesToPoints(0.8) 'Marge bas de page si nécessaire à adapter
 
    'Orientation à choisir c'est l'un ou l'autre mais pas les 2
    .Orientation = xlLandscape 'Paysage à adapter
    '.Orientation = xlPortrait 'Portrait à adapter
    .PrintArea = "C4:M26" 'Zone d'impression à adapter
End With

*Merci de ton retour

@Phil69970

Cliquez pour agrandir...

membsa à dit:

je le test ce jour et te fais mes retours.

Cliquez pour agrandir...