1 pièce(s) jointe(s)
ExportAsFixedFormat PDF sur une page impossible
Bonjour,
d'habitude je m'en sors mais aujourd'hui je bloque sur l'export de mon fichier excel vers PDF en 1 seule page tel que défini en zone d'impression.
même si je redéfinis au préalable la zone d'impression avant export vers PDF, elle change juste avant et du coup mon PDF est sur 2 pages (ou 1 seule quand "From:=1, to:=1" est indiqué mais il me manque un morceau) au lieu d'avoir l'échelle réduite pour faire tout apparaitre en 1 seule page.
Code:
1
2
3
4
5
6
7
8
9
| Sub CreerPDF()
Dim NomFich As String
NomFich = xxx
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=NomFich, Quality:= _
xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, From:=1, to:=1, OpenAfterPublish:=True
End Sub |
une fois le PDF généré, mon fichier affiche une zone d'impression sur 2 pages. cf image ci-dessous.
Merci pour votre retour sur comment palier à ce souci.
Pièce jointe 599880
