XL 2016 nommer une copie PDF avec le contenu d'une cellule (résolu)

[la fifine]

Dim NomFichier As String

    NomFichier = Range("A1")

    ChDir "C:\Users\pc pascal\Dropbox\Documents Pascal\dossier accident du travail"
  
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
      
"C:\Users\pc pascal\Dropbox\Documents Pascal\dossier accident du travail\ & NomFichier .pdf" _
      
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
  
     :=False, OpenAfterPublish:=False

bonsoir à tous
j'ai fais cette macro avec l'enregistreur pour enregistrer en pdf et nommer ce pdf avec le contenu de ("A1") NomFichier
écrit comme ça en faite ça me donne un pdf nommé &NomFchier ce qui n'a pas d'interet
qu'elle est la syntaxe exacte?
merci

solution trouvée il suffisait de supprimer le .pdf
desolé pour le dérangement