Discussion :

[pat17]

Bonjour forum,

Quelle est le code vba pour demander à excel une impression au format A3 en portarit et centré pour certaines feuilles du classeur

Merci à tous

[sabzzz]

bonjour pat17,

copie cette macro sur la page ThisWorkbook, et adapte le nom des feuilles.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Private Sub Workbook_BeforePrint(Cancel As Boolean)
sh = ActiveSheet.Name
If sh = "Feuil1" Or sh = "Feuil2" Or sh = "Feuil3" Then
    With Sheets(sh).PageSetup
        .CenterHorizontally = True
        .CenterVertically = True
        .Orientation = xlPortrait
        .PaperSize = xlPaperA3
    End With
End If
End Sub

[pat17]

bonjour sabzzz et le forum,

super ca marche

merci sabzzz et le forum

cordialement