Sub feuillepdf()
' feuillepdf Macro
'
ChDir _
"C:\Users\Utilisateur\Dropbox\Documents Pascal\Pointages\Feuilles d'atelier"
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\Utilisateur\Dropbox\Documents Pascal\Pointages\Feuilles d'atelier\FEUILLE ATELIER modèle.pdf" _
, Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas _
:=False, OpenAfterPublish:=False
End Sub