Utilisation: Dim stra as string strA = BrosweForFolder(frmMain, "Select Source Folder") If strA <> "" Then Votre code.... End If ------- Ajouté le fichier comme module
Télécharger le zip
Arf, très vieux aussi comme publication, mais merci, sa m'est utile ! ;)Bonne prog ! a++
Effectivement c'est bien utile ! Moi je cherchais un composant à la "Common Dialog Box" pour les dossiers, mais en fait c'est une fonction ...PS : Une petite remaque, le nom de la fonction est "BrosweForFolder(...)" pour ne pas qu'elle porte le même nom que le module, sinon ça ne compile pas ... N'essayez donc pas de la renommer en "BrowseForFolder(...)" sans autre modif ...NB: je mets une bonne note !
Salut, c'est ce que je cherchait à 2 détails près:1) Pouvoir définir un dossier par défaut.2) cette fenêtre existe dans d'autre logiciel mais avec un bouton :"Créer un nouveau dossier"....bref si tu sais comment on fais ça, ce serait sympat de nous le transmettre.Merci pour votre Attention.@+ Sator
C'est exactement ce que je cherchais, mais comme Sator, j'aurais besoin de pouvoir définir un répertoire par défaut.Merci!
Se souvenir du profil
Mot de passe oublié ? / Activation de compteCréer un compte
1 598 816 membres 115 nouveaux aujourd'hui 15 441 membres club