[VBA E] explorateur pour obtenir chemin de dossier

Bonjour à tous
je cherche à créer un bouton commande qui lancerais l'explorateur windows afin de récupérer un chemin de dossier (dans lequel sera placé des fichiers qui servent plus tard dans le programme) et qui l'inscrirait ensuite la ou je veux.
j'ai lu quelques post la dessus et plusieurs font référence à ce code:

http://vb.developpez.com/faq/?page=Fichiers#select_rep

ce que je voulais vérifier c'est s'il n'y avait pas une fonction plus simple ou déja definie qui existerait du genre getopenfilename pour les fichiers.
Merci et dsl du dérangement si ce n'est pas le cas
Rémi

bonjour

à partir d'Excel2002 tu peux utiliser la propriété FileDialog:

Code:

---

1 2 3 4 5 6 7

Dim Repertoire As FileDialog   Set Repertoire = Application.FileDialog(msoFileDialogFolderPicker) Repertoire.Show   If Repertoire.SelectedItems.Count > 0 Then _ MsgBox Repertoire.SelectedItems(1)

---

michel

Parfait exactement ce que je voulais
merci
sinon le code cité plus haut marche bien aussi mais tant qu'a faire c évite des appels et des déclarations inutiles
rémi