Le dossier existe ?

Tester l'existence d'un dossier

Exemple de syntaxe :

IF fnFolderExist("C:/MonRépertoire") = True Then

 La fonction :

Function fnFolderExist(DrivePath As String) As Boolean
    If Dir(DrivePath, vbDirectory) <> "" Then
        fnFolderExist = True
    Else
        fnFolderExist = False
    End If
End Function