Macro enregistrer PDF dans dossier spécifique

Résolu/Fermé
Aline - 7 juin 2017 à 16:13
 Aline - 7 juin 2017 à 16:45
Bonjour à tous,

Après recherches, je me tourne vers vous ne trouvant pas réponses à mon problème.
J'ai un fichier Excel pour lequel j'ai créé une macro "Enregistrer en pdf" avec ce que j'ai trouvé sur internet.
Cependant cette macro s'enregistre de manière automatique dans \mes documents\ et j'aimerais qu'il s'enregistre dans le serveur de la boîte sous "X:\Analyses\Service\Gestion\BOITE A OUTILS\Opportunité"

Selon la macro ci-dessous, où dois-je inclure le fichier d'enregistrement et sous quelle forme ?

Sub PDF()
Worksheets("Analyse de l'opportunité").Range("A1:U49").ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="Analyse de l'opportunité.pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=True
End Sub


Merci d'avance pour vos retours !

1 réponse

f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 709
7 juin 2017 à 16:41
Bonjour,

Sub PDF()
    Worksheets("Analyse de l'opportunité").Range("A1:U49").ExportAsFixedFormat Type:=xlTypePDF, _
        Filename:="X:\Analyses\Service\Gestion\BOITE A OUTILS\Opportunité\Analyse de l'opportunité.pdf", _
        Quality:=xlQualityStandard, _
        IncludeDocProperties:=True, _
        IgnorePrintAreas:=False, _
        OpenAfterPublish:=True
End Sub
0
Super merci beaucoup pour le coup de main !
0