Erreur enregistrer en pdf

Bonsoir

je besoin de votre aide ce code de le début ça marche bien mais après un jour il apparaître une erreur

Erreur d'exécution '-2147024773' (800707b)

Document non enregistrer

.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _

Replace(.[M11], "/", "_") & " " & .[F25] & ".pdf", Quality:=xlQualityStandard, _

IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False

merci d'avance

pas de réponse?

23:00 à 00:40 certains dorment !

et puis pas de photos ? pas de fichier non plus ...

qu'est-ce qu'il y a dans M11 ? est-ce que le chemin y est ??

exemple =

    nompdf = Environ("Temp") & "\" & "fichier test"
    ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=nompdf & ".pdf", Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False

Merci Steelson