Discussion :

[kluh]

Bonjour, je cherche à savoir s'il est possible par une fonction de savoir si un fichier dont le nom contient une chaine de caractères existe?

Il me semble que le fileExists nécessite un nom de fichier complet...
Et j'aimerai pouvoir faire un test du genre:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
if FSO.fileExists("C:\temp\*Result.xls") then
...

Merci

[ucfoutu]

Bonjour,

Avec la fonction Dir et VB seul, tout simplement ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox IIf(Dir("C:\temp\*Result.xls", vbHidden Or vbNormal) <> "", "existe", "n'existe pas")

EDIT :

si tu dois en vérifier plusieurs, fais-toi cette petite fonction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Private Function existeil(chemin As String) As Boolean
  existeil = Dir(chemin, vbHidden Or vbNormal) <> ""
End Function

que tu peux appeler ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Dim chemin As String
 chemin = "d:\*sai.txt"
 MsgBox existeil(chemin) ' affichera True ou False selon le cas

[kluh]

Merci!