RESOLU par Philippe - Code 1 page en largeur et 1 page en hauteur

[castor30]

Bonjour,
Existe-il un code Vba pour 1 page en largeur et 1 page en hauteur ?
Avec l'enregistreur de macro je ne vois pas.
En vous remerciant.

 

[phlaurent55]

Bonjour Castor,

avec ce code à adapter

    ActiveSheet.PageSetup.PrintArea = "$A$1:$L$88" '(Zone d'impression A1:L88 à adapter)
    With ActiveSheet.PageSetup
        .FitToPagesWide = 1
        .FitToPagesTall = 1
    End With

à+
Philippe

 

[castor30]

Bonjour Philippe
Content de te rencontrer de nouveau et te remercier pour ce code
Bon Week-end