Choisir l'emplacement d'enregistrement [Résolu]

Signaler
-
Messages postés
13916
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
17 janvier 2021
-
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

Messages postés
7203
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
17 janvier 2021
599
Messages postés
13916
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
17 janvier 2021
784
Merci, grâce à vous j'ai pu faire ce que je voulais!
Messages postés
13916
Date d'inscription
lundi 9 juin 2008
Statut
Contributeur
Dernière intervention
17 janvier 2021
784
peux-tu alors marquer la discussion comme résolue?