Tester l’existence d’un répertoire ou fichier

par Hervé Inisan · Publié 23 août 2007 · Mis à jour 12 mai 2014

Comment tester l’existence d’un répertoire ou d’un fichier en Visual Basic ?

La fonction Dir() permet de faire cette vérification.

Pour un répertoire

If Dir("C:\Mes documents", vbDirectory) = "" Then
  Msgbox "Le répertoire n'existe pas"
Else
  Msgbox "Le répertoire existe"
End If

If Dir("C:\Mes documents", vbDirectory) = "" Then

Msgbox "Le répertoire n'existe pas"

Else

Msgbox "Le répertoire existe"

End If

If Dir("C:\Mes documents\test.doc") = "" then
  Msgbox "Le fichier n'existe pas"
Else
  Msgbox "Le fichier existe"
End If

If Dir("C:\Mes documents\test.doc") = "" then

Msgbox "Le fichier n'existe pas"

Else

Msgbox "Le fichier existe"

End If

Pour utiliser ce qui précède, vous avez besoin de savoir taper du code Visual Basic dans un module Access, compiler du code, et exécuter du code.