Error Handling für Userform
14.02.2007 13:34:00
Jens
zum Thema Error Handling... Ich weiß, dass man das eigentlich auf Prozedurebene machen sollte...
Wenn ich nun aber trotzdem für eine Userform den Fehler an die aufrufende
Sub zurückgeben möchte - wie geht das? Ich hatte das folgender Maßen probiert:
Public
Sub ShowUserform()
On Error GoTo ErrHandl
UF_MeineUserform.Show
EndHandl:
Unload UF_MeineUserform
Set ... = Nothing
Application.StatusBar = False
...etc.
Exit Sub
ErrHandl:
MsgBox sErrorDescription & sErrorNumber ' vorher fixiert
Resume EndHandl
End Sub
Aber: Bei einem Fehler, der in der Userform auftritt, springt der Code nicht an die Stelle ErrHandl...
Gibt es eine Möglichkeit, der Userform das beizubringen?
Vielen Dank sagt
der Jens
Anzeige