Recherche de fichier à partir d'une cellule!!!!!

[seghi0051]

Bonjour,

Donc voilà mon problème, sur une de mes feuille excel il y a un nom de site exemple: Metz, mais à partir de cette cellule je veux chercher dans un répertoire ou il y a des fichier 93-XXXX.xls le fichier 93-Metz.xls. Donc je ne sais pas si je suis claire donc si quelqu'un peut m'aider.
Je suis preneur.

MERCI

 

[Pierrot93]

Re : Recherche de fichier à partir d'une cellule!!!!!

Bonjour,

regarde peut être ceci, en espérant que cela puisse t'aider :

If Dir("C:\MesDocs\Excel\93-" & Range("A1") & ".xls") <> "" Then MsgBox "trouvé"

bonne journée
@+

 

[seghi0051]

Re : Recherche de fichier à partir d'une cellule!!!!!

Bonjour Pierrot,
Je crois que je me suis mal exprimé, ce que je veux c de lister mon répertoire ou se trouve mes fichier 93-xxxx.xls
et ensuite je veux dans une feuille excel positionné le lien dans la cellule par rapport au nom de site par exemple:

Metz C:/MesDocs/93-Metz.xls
Paris C:/MesDocs/93-Paris.xls

J'espere etre claire,

Merci pour ta réponse.

 

[Pierrot93]

Re : Recherche de fichier à partir d'une cellule!!!!!

Re,

pour boucler :

Dim f As String
f = Dir("C:\MesDocs\Excel\93-*")
Do While f <> ""
    Range("A65536").End(xlUp)(2) = f
    f = Dir
Loop