Trouver fichier le plus récent récursivement (avec filtre)

Camaytoc · 06/12/2011, 17h22

Bonjour,

J'ai besoin de faire une recherche récursive d'un fichier et le copier dans un autre dossier. Ce que je cherche à faire semble un véritable défis. En effet après avoir silloné le web à ce sujet, je ne trouve rien de concluant.

Je cherche le fichier "index.xml" le plus récent dans "z:\statistics\..." et souhaite le copier dans c:\xsltprocDump. J'aimerais égualement pouvoir filtré la recherche des sous-dossier avec une chaine de texte contenu dans le nom des dossier. Comme je ne code pas vraiment en vba, je perd un temps fou à essayer de faire fonctionner des bouts de code, mais je n'arrive à rien qui fonctionne.

Il semblerait que cela soit un vrai défis sans le fameux Application.FileSerach qui n'est plus présent dans excel 2007. Je n'ai pas le choix d'utiliser cette version d'excel puisque notre entreprise utilise 2007...

Voici un exemple:

Sur Z:\statistics je cherche le fichier index.xml le plus récent dans les sous-dossier contenant le texte xbox. Tous les sous-dossier du dossier statistics porte un nom en date comme par exemple:"Z:\statistics\2011_12_05_14_21_57_xbox". Je veux pouvoir écrire un code VBA en auto_start qui lira dans une cellule le texte (ex.: "xbox", "wii", "ps3") et trouvera le fichier index.xml le plus récent dans le dossier contenant ce texte. Ensuite je dois copier ce fichier dans un autre dossier (c:\xsltprocDump).

Je vous demande votre aide!

Merci d'avance.

Camaytoc · 07/12/2011, 15h45

Est-ce possible de faire quelque chose qui répond à mes besoin sans Application.FileSearch?

Je suis bloqué et trop mauvais en vba pour trouver une manip avec FileSystemObject.

Merci de me donner un coup de main cela fait deux semaine que je bloque sur ce feature.

Access Newbie · 07/12/2011, 16h48

Bonjour,

Je pense que vous trouverez votre bonheur ici : http://silkyroad.developpez.com/vba/classefilesearch/

Camaytoc · 07/12/2011, 18h23

Oui merci, cependant j'aurais dû spécifier dans mon message que je ne peux utiliser d'addins il m'est impossible de déployer cela au studio de prod.

Access Newbie · 08/12/2011, 09h25

Bonjour,

Vous pouvez ne pas utiliser l'addin, mais copier coller le code que l'on vous donne dans le lien que je vous ai mentionné précédemment (cf partie III).

06/12/2011, 17h22	#1
Camaytoc Inscription : décembre 2011 Messages : 4 Détails du profil Informations personnelles : Sexe : Localisation : Canada Informations forums : Inscription : décembre 2011 Messages : 4 Points : -1 Points : -1	Trouver fichier le plus récent récursivement (avec filtre) Bonjour, J'ai besoin de faire une recherche récursive d'un fichier et le copier dans un autre dossier. Ce que je cherche à faire semble un véritable défis. En effet après avoir silloné le web à ce sujet, je ne trouve rien de concluant. Je cherche le fichier "index.xml" le plus récent dans "z:\statistics\..." et souhaite le copier dans c:\xsltprocDump. J'aimerais égualement pouvoir filtré la recherche des sous-dossier avec une chaine de texte contenu dans le nom des dossier. Comme je ne code pas vraiment en vba, je perd un temps fou à essayer de faire fonctionner des bouts de code, mais je n'arrive à rien qui fonctionne. Il semblerait que cela soit un vrai défis sans le fameux Application.FileSerach qui n'est plus présent dans excel 2007. Je n'ai pas le choix d'utiliser cette version d'excel puisque notre entreprise utilise 2007... Voici un exemple: Sur Z:\statistics je cherche le fichier index.xml le plus récent dans les sous-dossier contenant le texte xbox. Tous les sous-dossier du dossier statistics porte un nom en date comme par exemple:"Z:\statistics\2011_12_05_14_21_57_xbox". Je veux pouvoir écrire un code VBA en auto_start qui lira dans une cellule le texte (ex.: "xbox", "wii", "ps3") et trouvera le fichier index.xml le plus récent dans le dossier contenant ce texte. Ensuite je dois copier ce fichier dans un autre dossier (c:\xsltprocDump). Je vous demande votre aide! Merci d'avance.
	00

07/12/2011, 15h45	#2
Camaytoc Inscription : décembre 2011 Messages : 4 Détails du profil Informations personnelles : Sexe : Localisation : Canada Informations forums : Inscription : décembre 2011 Messages : 4 Points : -1 Points : -1	Est-ce possible de faire quelque chose qui répond à mes besoin sans Application.FileSearch? Je suis bloqué et trop mauvais en vba pour trouver une manip avec FileSystemObject. Merci de me donner un coup de main cela fait deux semaine que je bloque sur ce feature.
	01

07/12/2011, 16h48	#3
Access Newbie Membre confirmé Inscription : juillet 2006 Messages : 347 Détails du profil Informations forums : Inscription : juillet 2006 Messages : 347 Points : 289 Points : 289	Bonjour, Je pense que vous trouverez votre bonheur ici : http://silkyroad.developpez.com/vba/classefilesearch/
	00

07/12/2011, 18h23	#4
Camaytoc Inscription : décembre 2011 Messages : 4 Détails du profil Informations personnelles : Sexe : Localisation : Canada Informations forums : Inscription : décembre 2011 Messages : 4 Points : -1 Points : -1	Oui merci, cependant j'aurais dû spécifier dans mon message que je ne peux utiliser d'addins il m'est impossible de déployer cela au studio de prod.
	00

08/12/2011, 09h25	#5
Access Newbie Membre confirmé Inscription : juillet 2006 Messages : 347 Détails du profil Informations forums : Inscription : juillet 2006 Messages : 347 Points : 289 Points : 289	Bonjour, Vous pouvez ne pas utiliser l'addin, mais copier coller le code que l'on vous donne dans le lien que je vous ai mentionné précédemment (cf partie III).
	00

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email