Choisir l'emplacement d'enregistrement

Résolu/Fermé
WILK642 - 29 déc. 2020 à 15:25
yg_be Messages postés 21303 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mars 2023 - 30 déc. 2020 à 19:07
Bonjour, j'ai mis en place une macro pour convertir le fichier excel en PDF et l'enregistre sur un répertoire prédéfini. Cependant j'aimerais laisser l'utilisateur le choix de l'emplacement d'enregistrement du fichier. Pouvez vous m'aider?

Voici le code:

Sub Sélection_pour_publier_le_rapport()


Sheets(Array("PG", "Sommaire", _
"Partie I", "1.1 Faits marquants", _
"Partie II", "2.1 Maint préventives", "2.2 Maint correctives", "2.3 Demandes des interventions", "2.4 Astreintes", _
"Partie III", "3.1 Nettoyage locaux intérieurs", _
"Partie IV", "4.1 Planning SST", _
"Partie V", "5.1 Devis et Travaux")).Select
Sheets("PG").Activate


ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\Users\VN5624\OneDrive - ENGIE\Bureau\rapprot.pdf"

MsgBox ("Votre rapport est publié")

Sheets("PG").Select

End Sub

2 réponses

cs_Le Pivert Messages postés 7883 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 18 mars 2023 724
29 déc. 2020 à 15:49
0
yg_be Messages postés 21303 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mars 2023 1 326
29 déc. 2020 à 15:51
0
Merci, grâce à vous j'ai pu faire ce que je voulais!
0
yg_be Messages postés 21303 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 mars 2023 1 326
30 déc. 2020 à 19:07
peux-tu alors marquer la discussion comme résolue?
0