XL 2010 Comment donner le nom de l'onglet au pdf qu'on imprime

[Comanche77]

Bonjour
J'ai un classeur dont je voudrai imprimer les onglets en PDF mais j'aimerai que le nom du PDF soit celui de l'onglet .
Est ce possible ?

Merci

 

[Theze]

Bonjour,

A tester :

Sub Test()

    Dim Fe As Worksheet
    Dim Chemin As String
   
    Set Fe = Worksheets("Feuil1") 'adapter...
   
    With Fe
   
        Chemin = ThisWorkbook.Path & "\" & Fe.Name
       
        .ExportAsFixedFormat xlTypePDF, Chemin, xlQualityStandard, True
       
    End With
   
End Sub