Clever-Excel-Forum

Hallo, :91:
ich habe eine Frage zur Fehlerbehandlung:
Mein Programm bemerkt einen Fehler den ich mit Err.Raise 700 abfange. d.h die Variable err hat den Wert 700

Das Programm springt zur Sprungmarke "Fehler:"
Dort wird eine weitere Funktion aufgerufen.
Anschließend hat err den Wert 0, da in der Funktion u.a. der Befehl "On Error Resume Next" steht.

Gibt es eine Möglichkeit die beiden Fehlerbehandlungen unabhängig voneinander zu definieren, so dass nach dem ausführen der Funktion die err Variable weiterhin bei 700 bleibt.

LG Klaus

Erst nach Aufrufen der Funktion ändert sich der Wert. Also weisest Du ihn vorher einer Variablen zu und fragst die ab.

Hallöchen,

im Prinzip würde auch so was gehen:

Code:
Sub test()

Dim a

On Error GoTo errorhandler1

Err.Raise 700

MsgBox 1

On Error GoTo errorhandler2

Err.Raise 700

Exit Sub

errorhandler1:

a = eins

MsgBox 2

Resume Next

errorhandler2:

MsgBox 3

End Sub

Function eins()

On Error Resume Next

End Function

:19: Danke, das hat mir weitergheholfen.

Schmittklaus

LCohen

schauan

Schmittklaus