[VBA/Excel] Rechercher fichiers dans dossier

Fermé
sfritz - 4 déc. 2008 à 15:14
michel_m Messages postés 16602 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 4 déc. 2008 à 15:38
Bonjour,
je suis sous VBA Excel et j'aimerai rajouter tous les noms des fichiers texte (fichier1.txt, fichier2.txt ...) d'un dossier spécifique (adresse connue) dans un ComboBox, pour pouvoir choisir par la ComboBox lequel ouvrir.

Mon souci est que je ne sais pas comment récupérer les noms des ficher d'un dossier.

Pouvez vous m'aider?

Merci
A voir également:

1 réponse

michel_m Messages postés 16602 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 312
4 déc. 2008 à 15:38
Re,



ChDir "d:\documents\vbscripts" ' a adapter
fich = Dir(An_0 & "*.txt")
While fich <> ""
'ta procédure de remplissage du combo
fich = Dir
Wend

Qui plus est, cela évite ma procédure de sauvage! :=)
0