wie muss ich die Fehlerabfrage um den Dir-Befehl bauen, um zu prüfen, ob ein Verzeichnis vorhanden ist?
Bisher habe ich folgendes:
sDateiname = Dir(sPfadImportDatei & "*.xls?", vbNormal)
Danke Euch.
Dim sDateiname$, sPfadImportDatei$
sPfadImportDatei = "C:\Test\Datei"
sDateiname = Dir(sPfadImportDatei & "*.xls?", vbNormal)
If sDateiname "" Then
MsgBox "Datei vorhanden"
Else
MsgBox "Datei nicht vorhanden"
End If
Gruß MatthiasDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen