flyonets44
XLDnaute Occasionnel
Bonsoir à tous
Petit souci avec ce fichier récupéré sur le site
cette fonction plante et je ne sais pas pourquoi
Function FileExists(sFileName As String) As Boolean
On Error Resume Next
FileExists = ((GetAttr(sFileName) And vbDirectory) = 0)
End Function
Merci d'avance
Cordialement
Flyonets
Petit souci avec ce fichier récupéré sur le site
cette fonction plante et je ne sais pas pourquoi
Function FileExists(sFileName As String) As Boolean
On Error Resume Next
FileExists = ((GetAttr(sFileName) And vbDirectory) = 0)
End Function
Merci d'avance
Cordialement
Flyonets