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ß Matthias