Macro pour enregistrer une feuille excel en format pdf
Résolu/Fermé
Jeeprock
Jeeprock
- Messages postés
- 31
- Date d'inscription
- mardi 26 mars 2013
- Statut
- Membre
- Dernière intervention
- 30 octobre 2019
Jeeprock
- Messages postés
- 31
- Date d'inscription
- mardi 26 mars 2013
- Statut
- Membre
- Dernière intervention
- 30 octobre 2019
A voir également:
- Macro pour enregistrer une feuille excel en format pdf
- Macro pour enregistrer une feuille excel en format pdf ✓ - Forum - Excel
- Macro pour enregistrer une feuille excel dans un dossier ✓ - Forum - VB / VBA
- Macro pour enregistrer une feuille excel en pdf ✓ - Forum - Excel
- Macro pour enregistrer une feuille excel d'un classeur ✓ - Forum - Excel
- Enregistrer une feuille Excel au format Word ✓ - Forum - Excel
1 réponse
cs_Le Pivert
30 oct. 2019 à 11:17
- Messages postés
- 7784
- Date d'inscription
- jeudi 13 septembre 2007
- Statut
- Contributeur
- Dernière intervention
- 24 juin 2022
30 oct. 2019 à 11:17
Bonjour,
cela fonctionne, mais il faut un dossier nommé "Mondossier" sur le Bureau:
Voilà
cela fonctionne, mais il faut un dossier nommé "Mondossier" sur le Bureau:
Sub Stat_Lundi() Dim fichier, Dossier, chemin 'Enregistrement du fichier Stat. With Worksheets("Lundi") fichier = "Stat_Lundi" & ".pdf" Dossier = "C:\Users\LePivert\Desktop\Mondossier\" chemin = Dossier & fichier .ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ chemin, Quality:=xlQualityStandard, _ IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:= _ False End With End Sub
Voilà
30 oct. 2019 à 13:41