[VBA]-Liste de tous les fichiers du disque

Fermé
blux Messages postés 26476 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 17 novembre 2024 - 14 nov. 2003 à 17:05
 guiguite - 19 oct. 2010 à 17:15
Bonjour,

je cherche le moyen de lister en VBA l'intégralité des fichiers présents sous une arborescence (sous-répertoires inclus). En gros, l'équivalent de la commande DOS : DIR /S /B

J'ai essayé avec la fonction shell("command.com"), mais command.com n'accepte pas de paramètre, genre DIR, vu que la-dite commande DIR est interne au shell (pas d'exécutable).

Les commandes VB classiques dir, chdir ne me sont d'aucun secours car elles ne sont pas récursives et je ne me vois pas gérér un nombre inconnu de listes de tailles inconnues... (problème du non-récursif).

Je souhaite faire ça en VBA (dans ACCESS), mais je ne veux pas utiliser d'OCX, ni d'api non-standard. Je me contenterais de l'api win32 standard :-)

Même une liste créée dans un fichier que je relit me suffirait...

Si quelqu'un avait un début de piste, ça m'aiderait bien... je galère depuis une bonne demi-journée...

Merci d'avance !

A+ Blux
 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"
A voir également:

4 réponses

kcinnad Messages postés 171 Date d'inscription vendredi 8 juin 2007 Statut Membre Dernière intervention 12 août 2011 51
23 juil. 2009 à 08:42
Juste pour remonter un sujet de 6ans!
1
blux Messages postés 26476 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 17 novembre 2024 3 316
17 nov. 2003 à 16:05
ben, comme j'ai posté vendredi soir, et que le week-end est passé par dessus, je remonte le post pour voir s'il y a des amateurs... :-)

A+ Blux
 "Les cons, ça ose tout.
C'est même à ça qu'on les reconnait"
0
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 293
23 juil. 2009 à 09:22
une Question...
Est-ce qu'il y a un vide grenier sur CCM ce week-end?
0
tompols Messages postés 1273 Date d'inscription jeudi 29 juillet 2004 Statut Contributeur Dernière intervention 25 novembre 2013 435
23 juil. 2009 à 09:40
Bonjour,
Je n'ai pas access sous la main mais je joins un fichier Excel contenant une macro ListeFichiers qui devrais t'aider (utilisation de Office.FileSearch + FSO)....
http://www.cijoint.fr/cjlink.php?file=cj200907/cijaLLKTxZ.xls
Bonne journée
0
merci !!!!!!!!!!!!!
0