Grundlagen der Programmierung mit VBA Visual Basic for
Grundlagen der Programmierung mit VBA Visual Basic for
Grundlagen der Programmierung mit VBA Visual Basic for
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
3.6.4 Behandlung von Benutzerfehlern<br />
Mit On Error steht ein Mechanismus zur Verfügung, <strong>der</strong> die Ausführung einer Prozedur überwacht<br />
und im Falle eines Fehlers an einer an<strong>der</strong>en Stelle des Codes eine gewisse Anweisung ausführt. Das<br />
Verfahren beruht auf <strong>der</strong> Anwendung von Sprüngen innerhalb des Programmcodes. Die Verwendung<br />
von Sprüngen ist ein inzwischen veralteter Programmierstil und sollte außer bei Fehlerbehandlungen<br />
nicht verwendet werden.<br />
Syntax<br />
On Error Goto FehlerLabel<br />
On Error Goto 0<br />
Resume Fortsetzung<br />
Parameter Verwendung<br />
FehlerLabel Sprungadresse innerhalb <strong>der</strong> Prozedur, nach <strong>der</strong> die Anweisungen des<br />
Fehlerfalles angegeben sind<br />
0 Rückgabe <strong>der</strong> Fehlerkontrolle an <strong>VBA</strong> ("Zurücksetzen").<br />
Resume Angaben <strong>der</strong> Sprungadresse zum Fortsetzen des Programmes<br />
Beispiel. Division durch 0 verhin<strong>der</strong>n.<br />
Sub Division()<br />
Dim inp As Variant, out As Variant<br />
Eingabe:<br />
inp = InputBox("Bitte einen Wert eingeben")<br />
On Error Goto DivFehler<br />
out = 1 / inp<br />
On Error Goto 0<br />
MsgBox "1/" & inp & "=" & out<br />
Exit Sub<br />
DivFehler:<br />
MsgBox "Fehler: Division durch 0!"<br />
Resume Eingabe<br />
End Sub<br />
39