Application.FileSearch

[hiba_123]

bonjour tout l'monde;
voila j'ai un fichier de consolidation de plusieurs classeurs, sous la version excel2003, sauf qu'avec la version 2007 l'application :Application.FileSearch n'est plus reconnue!!!!
kelk'1 peut m'sauver!!!!

 

[tototiti2008]

Re : Application.FileSearch

Bonjour hiba_123,

peut-être ce fil peut-il t'intéresser
Je ne peux pas ouvrir les zip alors je ne sais pas si ça correspond

https://www.excel-downloads.com/threads/recherche-fichiers-sur-disque.142158/

 

[hiba_123]

Re : Application.FileSearch

franchement... j'ai pas trouver la réponse a ma question!!!!

 

[kiki29]

Re : Application.FileSearch

Salut, voir ces 2 liens et adapter à ton contexte
https://www.excel-downloads.com/threads/migration-filesearch-excel-2002-vers-2007.77162/
Un complément FileSearch pour Excel 2007

 

[hiba_123]

Re : Application.FileSearch

ya pas possibilité d'apporter les modifications si necessaire directement sur l'exemple transmit!!!? si c'est possible biensur.... j'arrive pas a avoir de resultats malgrés que j'ai tout suivi sur le lien transmit...

 

[Pierrot93]

Re : Application.FileSearch

Bonsoir à tous,

le code ci-dessous devrait suffire, enfin si j'ai bien compris.... A adapter :

(code de MichelXLD sur le lien donné par Kiki)

Dim Chemin As String, Fichier As String
Chemin = "C:\dossier\"
Fichier = Dir(Chemin & "*.xls")
Do While Fichier <> ""
    ComboBox1.AddItem Fichier
    Fichier = Dir
Loop

bonne soirée
@+