Export PDF avec le dossier dans une cellule

Bonjour à tous,

Je cherche un macro pour qu'il exporte le PDF au chemin écris dans une cellule. Cette adresse change selon des conditions c'est pour sa que l'adresse ou je souhaite que le fichier se mettent est dans une cellule.

Mercis à tous

Hello,

à tester et à adapter (export de la feuille active + répertoire en A1) :

Sub SavePDF()
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
    Filename:= Feuil1.Range("A1").value & ".pdf", _
    OpenAfterPublish:=True
End Sub

R@G

Merci beaucoup sa marche nickel.

Passe de de bonne fête