Ouvrir un fichier sans en connaître le nom complet

Salut tout le monde,

J'ai un petit défi pour les magiciens du coin. J'ai besoin que VBA ouvre pour moi un fichier dont je ne connais pas le nom complet, j'ai juste le nom du dossier dans lequel il est ainsi que son préfixe, qui est unique parmi les fichiers présents dans le dossier.

Ainsi, le fichier que je dois ouvrir est l'unique à avoir le format NomDuDossier\BRA_NomDuFichier.xls, mais comme je ne connais pas NomDuFichier, je ne peux pas utiliser simplement les commandes habituelles. J'ai pensé à tester toutes les possibilités pour NomDuFichier (qui utilise un certain format et dont l'ensemble des possibles est grand néanmoins fini), mais je me demande s'il n'existe pas une méthode moins bourrine.

Merci d'avance.

Bonjour

Une macro qui fonctionne chez moi

Adaptes le chemin

Sub ouvre()
Dim Chemin As String

  Chemin = ThisWorkbook.Path & "\"
  Workbooks.Open Filename:=Chemin & Dir(Chemin & "BRA_*.xls")
  ActiveWorkbook.Close savechanges:=False
End Sub

La fonction Dir est exactement ce que je cherchais, merci.