XL 2013 Exporter plusieurs feuilles vers un PDF.

thebenoit59

XLDnaute Accro
Bonjour le forum.

Quelqu'un saurait exporter plusieurs feuilles d'un même classeur sur un seul fichier PDF ?
Mon classeur comporte trois feuilles, et seules les deux premières m'intéressent.

Edit: la seule astuce, utilisée pour le moment, est de masquer la troisième feuille avant l'export du classeur complet.

Merci d'avance.
 
Dernière édition:

kiki29

XLDnaute Barbatruc
Salut, regarde en bas du post 1
la partie intitulée : Impression de certaines Feuilles d'un classeur via un tableau dans un seul Pdf résultant et adapte à ton contexte

bref qqch comme ceci :

Option Explicit

Sub Tst_2007()
Dim sNomFichierPDF As String
Dim Ar(1) As String

sNomFichierPDF = ThisWorkbook.Path & "\" & "Test.pdf"
Ar(0) = "Feuil1"
Ar(1) = "Feuil3"
Application.ScreenUpdating = False
Sheets(Ar).Select

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=sNomFichierPDF, _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False

Sheets("Feuil1").Select
Application.ScreenUpdating = True
End Sub
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 929
Messages
2 093 702
Membres
105 789
dernier inscrit
dulcioso