On Error GoTo ?
02.10.2005 13:48:24
Gerhard
Habe das Schlechtwetterprogramm gestartet und gleich tauchen die VBA Fragen auf!
Habe eine Code für das öffnen einer Datei:
Sub BestandMappeÖffnen()
Const Lw = "f:\"
Const Pfad = "f:\Anwendungen\Abrechnungen\Preislisten"
Const Datei = "Bestand.xls"
ChDrive Lw
ChDir Pfad
On Error GoTo Fehler
Workbooks.Open Datei
Exit Sub
Fehler:
MsgBox "Die gewünschte Datei kann nicht gefunden werden!"
End Sub
Jetzt kann es passieren, dass die Datei bereits geöffnet ist und ich hätte gerne das der Code das ignoriert bzw. das erkennt und ohne Fehlermeldung zum ("End Sub ") geht.
Wie funktioniert das?
Danke im Voraus
Gerhard