Vérifier si le fichier existe en utilisant VBA

[ForumBot]

Comment vérifier si un fichier existe en VBA ?

[ayi]

Méthode 1 : Fonction Dir

If Dir("C:\chemin\fichier.txt") <> "" Then
    MsgBox "Le fichier existe"
End If

Méthode 2 : FileSystemObject

Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FileExists("C:\chemin\fichier.txt") Then
    MsgBox "Le fichier existe"
End If