Aide macro commande excel / excel save en pdf Fermé

Question

Bonjour, 

je veux sauvegarder une feuille excel en pdf.
J'ai créé la macro commande qui fonctionne parfaitement.
Mais je souhaite que le fichier pdf prenne de lui même le nom qui s'affiche dans la case B5 de ma feuille excel.
que dois modifier ?
voici ma macro commande :

    ChDir _
        "N:\17000
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
        "N:\17000\APS\ ALS PDFS ET TRES\TRES\TRES NUMERO & B5.pdf" _
        , Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
        :=False, From:=1, To:=1, OpenAfterPublish:=True
    ActiveSheet.Shapes.Range(Array("Picture 1")).Select
    Selection.OnAction = "enregistre"
    ActiveCell.Offset(1, 3).Range("A1").Select
End Sub

ccm81 · Answer

Bonjour

essaies ceci
Filename:= "N:\17000\APS\ ALS PDFS ET TRES\TRES\TRES NUMERO" & B5 & ".pdf"

Cdlmnt

Nono74 · Answer

Merci cela fonctionne