[VBA] Renommer un fichier au nom inconnu

Bonjour à toutes et à tous,

Ci-dessous un petit souci que je ne parviens pas à résoudre... =S

Je souhaiterai, en VBA, renommer un fichier dont je ne connais pas le nom avec un nom définit dans une variable.

Exemple:

Le fichier toto.csv se trouve dans le répertoire C:\test\
Je ne connais pas le nom de toto.csv et je souhaiterai le renommer en titi.csv
Il n'y a systématiquement qu'un seul et unique fichier dans le répertoire C:\test\ (mais son nom est variable...)

Dans mon cas, impossible d'utiliser la fonction ci-dessous car je ne connais pas le nom original:

Sub Test()
Name "C:\Test\toto.csv" As "C:\Test\titi.csv"
End Sub

J'ai tenté (l'illusion du débutant...) des astuces telles que:

Sub Test()
Name "C:\Test\*.csv" As "C:\Test\titi.csv"
End Sub

En vain, le rêve a ses limites =)

J'ai également tenté de récupérer le nom du fichier dans une variable (Avec une fonction de type Application.FileSearch...) en vain, je n'y arrive pas.

Auriez vous une petite idée ?

Merci d'avance,

Dan