Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Dateistandort überprüfen

Forumthread: Dateistandort überprüfen

Dateistandort überprüfen
02.07.2008 12:46:00
Gordon
Moin,
ich habe folgende Zeile um eine Datei in einem Order aufzurufen:

Workbooks.Open Filename:=ThisWorkbook.Path & "\Test.xls"


Wenn es nun aber keine Datei mit dem Namen Test.xls in dem Ordner gibt, kommt logischerweise eine Fehlermeldung vom Makroeditor. Ich würde es aber gerne so haben, falls es den Dateinamen nicht im Ordner gibt, dass eine Messagebox aufgeht und darauf hinweißt, dass es die Datei nicht gibt.
Wie könnte man sowas am besten umsetzen?
Gruß
Gordon

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Dateistandort überprüfen
02.07.2008 12:57:00
Dani
Hallo ein Ansatz:

On Error GoTo err
Workbooks.Open Filename:=ThisWorkbook.Path & "\Testhgf.xls"
err:
If err.Number = 1004 Then MsgBox "Datei nicht vorhanden", vbCritical, "Fehler"


Gruss
Dani

AW: Dateistandort überprüfen
02.07.2008 13:11:00
Gordon
...ich danke....
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige