Lorsque vous programmez vos macros, vous devrez peut-être déterminer si un fichier particulier existe sur le disque. Par exemple, le but de votre macro peut être d’ouvrir et de lire à partir d’un fichier texte. Avant de faire cela, vous voudrez vérifier si le fichier existe, afin d’éviter une erreur.

La fonction suivante peut être utilisée pour vérifier l’existence d’un fichier.

Tout ce que vous avez à faire est de lui transmettre le nom de fichier complet sous forme de chaîne, et la macro renvoie soit True (si le fichier existe), soit False (si ce n’est pas le cas).

Function FileThere(FileName As String) As Boolean     FileThere = (Dir(FileName) > "")

End Function

Vous pouvez utiliser la fonction similaire à la suivante:

If FileThere("c:\myfile.txt") Then     '     ' Do stuff here     ' Else     MsgBox "File Not There!"

End If

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites WordTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / wordribbon-WordTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

WordTips est votre source pour une formation Microsoft Word rentable.

(Microsoft Word est le logiciel de traitement de texte le plus populaire au monde.) Cette astuce (819) s’applique à Microsoft Word 97, 2000, 2002 et 2003. Vous pouvez trouver une version de cette astuce pour l’interface ruban de Word (Word 2007 et plus tard) ici:

link: / wordribbon-Determining_If_a_File_Exists [Déterminer si un fichier existe].