Bei Fehler eine Anzahl von Befehlzeilen überspring
01.12.2004 20:59:07
Befehlzeilen
ich möchte, dass wenn das Programm die Datei "PfadplusDatei" nicht findet, zu der Zeile "Next Lzaehler" springt. Welche Möglichkeiten gibt es?
On Error Goto xxx - hat nicht wirklich funktioniert
Freue mich über jeden Hinweis. Danke
Beispiel:
For Lzaehler = 5790 To 5999
PfadplusDatei = "D:\Reports\" & JahrMonat & "_" & Lzaehler "_Lagerreport.csv"
On Error Resume Next
Workbooks.Open FileName:=PfadplusDatei
On Error Resume Next
Call Lagerreportlayout(JahrMonat, Lagerzaehler)
Call Persol_clear
Next Lzaehler