Sondage de fichiers dans differents repertoires

Bonsoir a tous,

je bloque actuellement sur la création d'un fichier et c'est pour cela que je souhaites solliciter l'aide de la communauté.

De temps en temps je suis dans l'obligation de vérifier que certains dossiers contiennent bien certains fichiers, ceci permettant de valider ou non l'existence de ces fichiers.

Vous trouverez donc en PJ une maquette de ce que je souhaites réaliser.

solution 1 :

avant de prendre contact avec vous tous, j'ai commencé par me dire que je pourrais faire ce que je veux en récupérant dans un premiers temps tous les noms des dossiers et fichiers de tous les répertoires, sous répertoires ( voir feuille 1). Actuellement je bloque sur cette macro car je n'arrive pas a récupérer le nom du dossier ou sous dossiers.

Pour ce qui est de la construction du dashboard j'aurais pu le réaliser avec des rechercheV et des MFC. Je ne suis pas certains que cela soit la meilleur solution, la plus facile, la plus efficace.

solution 2 :

Aucune idée, qu'en dites vous ?

ci joint les fichiers de test ou à cette adresse ,

Bonjour,

Ta question ne me parait pas claire.

S'il s'agit de tester la présence d'un fichier une simple fonction personnalisée suffit :

Function FileExist(NF) As Boolean
Dim s$
Application.Volatile 'selon l'usage facultatif ou non
s = Dir(NF)
FileExist = Not s = ""
End Function

Par suite si tu as déjà une liste des fichiers (et chemins) à tester tu n'as même pas besoin de ton "Dashboard", une simple macro est capable de te restituer instantanément la liste des fichiers manquants...

Mébon je n'ai peut-être pas tout compris...

A+

Bonjour galopin et merci pour ta réponses.

Je cherche effectivement a tester l existence d une liste de fichiers dans plusieurs dossiers.

Ces fichiers doivent exister dans tous les dossiers (1,2,3....) et dans des sous dossiers différents et peuvent être dans des versions différente (1.1 /1.2 /1.3....)

Le dashboard permet de remonter les informations de façon graphique (ok , ko) avec la possibilité de cliquer sur OK pour ouvrire les fichiers.

Encore merci,

une idée ?