Save as pdf

Bonjour j'ai un problème de macro pour enregistrer en pdf.

la macro fonctionne sur mon pc en excel 2010

Mais pas sur mon lieu de travail excel 2016

 Sheets("QUESTIONS").Select
  Range("A1").Activate
    chemin = "x"

    texte = Replace(Replace(Range("B1").Value, "/", "-"), ":", "-") & ".pdf"
    Application.DisplayAlerts = False

    ActiveWorkbook.ExportAsFixedFormat Type:=x1TypePDF, Filename:=chemin & texte, _
    Quality:=x1QualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
    OpenAfterPublish:=False

Bonjour,

Tu oublies le caractère séparateur de chemin \ en fin de déclaration :

chemin="c:\xxx\yyyy\"

bah écoute nan la j'ai mit une croix pour masquer le chemin mais c'est pas ca la source du problème

cf PJ

Re,

Merci de nous joindre un fichier !...

Cdlt.

C'est juste la sauvegarde du pdf qui fonctionne pas je suis pas sur que ca ai un rapport avec la macro ^^'