Sub Save_PDF_Modèle()
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\romain\Downloads\Dossiers des enregistrements de tableau\Enregistrement tableau Modèle\Tableau Modèle" & " " & Format(Date, "yyyy.mm.dd") & " " & Format(Time, "hh.mm.ss"), Quality:=xlQualityStandard, _
IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _
False
End Sub