Bonsoir à tous,

J'ai besoin d'aide car j'essaie en vain de faire un teste sur la presence d'un fichier dans repertoire. voici mon programme

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Private Sub CommandButton4_Click()
 
Dim chemin As String
 
 
 
 
chemin = "C:\tata" & "\" & "toto" & ".xls"
 
 
MsgBox chemin
MsgBox Dir(chemin)
 
If Dir(chemin) = "" Then
 
   MsgBox "Le fichier n'existe pas"
 
Else
 
    MsgBox "Le fichier " & chemin & " Existe"
 
End If
End Sub
je n'arrive pas à voir ce qui cloche.
pouvez vous m'aider?

merci

cordialement

ben