Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
360to364
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
360to364
360to364
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

mit VBA prüfen, ob Datei vorhanden

mit VBA prüfen, ob Datei vorhanden
08.01.2004 09:36:33
Rolf
Guten Tag miteinander
Ich öffne mit einem VBA-Programm Dateien, die ich mit einer Loop-Funktion aus einer Tabelle auslese, verarbeite und dann wieder schliesse. Falls eine Datei nicht vorhanden ist, soll das VBA einfach witerlaufen. Ich weiss leider nicht, wie ich das machen kann.
Hier ein Ausschnitt meines VBA, das so leider nicht funktioniert:
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

Private Sub Datenimport(strPfadName As String)
'Datei öffnen
If "Workbooks.Open Filename:=strPfadName" = False Then GoTo ende3 Else GoTo weiter2
weiter2:
Workbooks.Open Filename:=strPfadName
'Verarbeitung
Call Import
ende3:
End Sub

>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
Vielen Dank bereits im Voraus für Eure Bemühungen
Gruss
Rolf

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

Betreff
Datum
Anwender
Anzeige
AW: mit VBA prüfen, ob Datei vorhanden
08.01.2004 09:45:18
Dieter Klemke
Hallo Rolf,
du kannst das z.B. so machen:

Private Sub Datenimport(strPfadName As String)
'Datei öffnen
If Dir(strPfadName) = "" Then GoTo ende3 Else GoTo weiter2
weiter2:
Workbooks.Open Filename:=strPfadName
'Verarbeitung
Call Import
ende3:
End Sub

MfG
Dieter
AW: mit VBA prüfen, ob Datei vorhanden
08.01.2004 12:38:28
Rolf
Hallo Dieter
Vielen Dank, funktioniert einwandfrei.
Gruss Rolf
Anzeige

305 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige