Während Sie Ihre Makros programmieren, müssen Sie möglicherweise feststellen, ob eine bestimmte Datei auf der Festplatte vorhanden ist. Der Zweck Ihres Makros kann beispielsweise darin bestehen, eine Textdatei zu öffnen und daraus zu lesen. Bevor Sie dies tun, sollten Sie überprüfen, ob die Datei vorhanden ist, um einen Fehler zu vermeiden.

Die folgende Funktion kann verwendet werden, um das Vorhandensein einer Datei zu überprüfen.

Sie müssen lediglich den vollständigen Dateinamen als Zeichenfolge übergeben, und das Makro gibt entweder True (falls die Datei vorhanden ist) oder False (falls nicht vorhanden) zurück.

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

End Function

Sie können die folgende Funktion verwenden:

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

End If

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

Klicken Sie hier, um diese spezielle Seite in einem neuen Browser-Tab zu öffnen.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (819) gilt für Microsoft Word 97, 2000, 2002 und 2003. Sie finden eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Word (Word 2007) und später) hier:

Feststellen, ob eine Datei vorhanden ist.