Lire dans un fichier fermé, avec nom de fichier pas complet.

Bonjour,

j'utilise actuellement ce bout de code pour aller lire dans un fichier fermé une plage et la copier dans mon fichier excel.

Chemin = "C:\excel\"
Fichier = Sheets("INDEX JOURS").Cells(4, 17)
Onglet = [B55]
ThisWorkbook.Names.Add "plage", _
RefersTo:="='" & Chemin & "[" & Fichier & "]" & Onglet & "'!$B$3:$F$52"

le problème, c'est que le nom de mes classeurs à importer sont en partie variable, mais restent identifiable par une partie de leur nom exemple : analyse semaine 42_2015-xx-xx (les x étant variables)

Je recherche donc un moyen d'écrire cela pour que cela marche sans avoir le nom complet du fichier.

merci d'avance pour vos réponses

Rémi