Choix de destination d'enregistrement

Polycontraste -  
yg_be Messages postés 23437 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

1 réponse

  1. 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
    1. yg_be Messages postés 23437 Date d'inscription   Statut Contributeur Dernière intervention   1 588
       
      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