So überprüfen sie mit vba, ob eine datei vorhanden ist (mit beispiel)

Sie können die Dir- Funktion in VBA verwenden, um zu überprüfen, ob eine bestimmte Datei in einem bestimmten Ordner vorhanden ist.

Hier ist eine übliche Art, diese Aussage in der Praxis zu verwenden:

 SubCheckFileExists ()

'ask user to type path to file
InputFile = InputBox(" Check if this file exists: ")

'check if file exists and output results to message box
If Dir(InputFile) <> "" Then
    MsgBox “ This File Exists ”
Else
    MsgBox “ This File Does Not Exist ”
End If

End Sub

Dieses spezielle Makro erstellt ein Eingabefeld, in das der Benutzer einen vollständigen Pfad zu einer Datei eingeben kann, um zu überprüfen, ob diese existiert.

Sobald der Benutzer den Dateipfad eingibt, erzeugt das Makro ein Meldungsfeld, das angibt, ob die Datei vorhanden ist oder nicht.

Das folgende Beispiel zeigt, wie diese Syntax in der Praxis verwendet wird.

Beispiel: Überprüfen Sie mit VBA, ob eine Datei vorhanden ist

Angenommen, wir haben einen Ordner an folgendem Ort:

C:\Benutzer\bob\Dokumente\aktuelle_Daten

Dieser Ordner enthält drei CSV-Dateien:

Nehmen wir an, wir möchten mit VBA prüfen, ob in diesem Ordner eine Datei namens football_data.csv vorhanden ist.

Dazu können wir das folgende Makro erstellen:

 SubCheckFileExists ()

'ask user to type path to file
InputFile = InputBox(" Check if this file exists: ")

'check if file exists and output results to message box
If Dir(InputFile) <> "" Then
    MsgBox “ This File Exists ”
Else
    MsgBox “ This File Does Not Exist ”
End If

End Sub

Sobald wir dieses Makro ausführen, erscheint ein Eingabefeld, in das wir den Dateipfad eingeben können:

Wir geben den vollständigen Pfad der Datei football_data.csv ein:

Sobald wir auf „OK“ klicken, erscheint ein Meldungsfeld, das uns mitteilt, ob die Datei in dem von uns angegebenen Ordner vorhanden ist:

Das Meldungsfeld teilt uns mit, dass die Datei vorhanden ist.

Hinweis : Die vollständige Dokumentation zur Dir- Funktion finden Sie hier .

Zusätzliche Ressourcen

In den folgenden Tutorials wird erläutert, wie Sie andere häufige Aufgaben in VBA ausführen:

So erstellen Sie Ordner mit VBA
So löschen Sie Ordner mit VBA
So löschen Sie Dateien mit VBA