Choix de destination d'enregistrement

Polycontraste -  
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Totalement novice en la matière de VBA, je souhaite modifier une macro d'enregistrement en PDF qui pointe le dossier "Desktop" mais si je partage cette feuille de calcule le dossier pointé n'existe plus car plus le meme utilisateur, je souhaite donc faire apparaitre une boite de dialogue qui me permettra de définir ou sauvegarder mon export PDF ou utiliser une destination que sera toujours les desktop actif

Merci de vos réponses
A voir également:

1 réponse

Utilisateur anonyme
 
Bonjour

Tout d’abord un petit tuto
https://excel-malin.com/tutoriels/vba-fonctions/vba-fonction-environ/

Et là un exemple qui crée un dossier sur le bureau (donc connait le chemin du bureau)

https://vbaf1.com/file-directory/create-folder-on-desktop/


0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584
 
L'exemple suppose que le bureau se trouve au même endroit que les infos de profil. C'est parfois vrai.

Ceci me semble plus fiable:
Function GetDesktop() As String
    Dim oWSHShell As Object

    Set oWSHShell = CreateObject("WScript.Shell")
    GetDesktop = oWSHShell.SpecialFolders("Desktop")
    Set oWSHShell = Nothing
End Function
0