XL 2013 Enregistrement feuille sous pdf

[Appo1985]

Bonsoir.
J'ai besoin d'aide.
Je voudrais remplacer le macro qui me permet d'imprimer la liste par école par un autre qui enregistre sous pdf chaque fichier enregistré indiquant le nom de l'école.
J'ai essayé mais il ya un message d'erreur qui s'affiche.
Ci-joint le fichier.
Merci par avance pour votre aide.

 

[kiki29]

Salut, à voir avec

Range("Tableau2[#All]").ExportAsFixedFormat Type:=xlTypePDF, _
                                                        Filename:=FilePath & "\" & "Liste de " & cel.Value, _
                                                        Quality:=xlQualityStandard, _
                                                        IncludeDocProperties:=True, _
                                                        ignorePrintAreas:=False, _
                                                        OpenAfterPublish:=True

 

[Appo1985]

Bo

Salut, à voir avec

Range("Tableau2[#All]").ExportAsFixedFormat Type:=xlTypePDF, _
                                                        Filename:=FilePath & "\" & "Liste de " & cel.Value, _
                                                        Quality:=xlQualityStandard, _
                                                        IncludeDocProperties:=True, _
                                                        ignorePrintAreas:=False, _
                                                        OpenAfterPublish:=True

Bonjour.
J'ai testé et ça marche très bien
Grandement merci