Freigeben über


Resume-Anweisung

Nimmt die Ausführung wieder auf, nachdem eine Fehlerbehandlungsroutine beendet wurde.

Syntax

Resume [ 0 ]
Resume Next
Zeile fortsetzen

Die Syntax der Resume-Anweisung kann die folgenden Formen annehmen:

Anweisung Beschreibung
Resume Wenn der Fehler in der gleichen Prozedur wie die Fehlerbehandlungsroutine aufgetreten ist, wird die Ausführung bei der Anweisung wieder aufgenommen, die den Fehler verursacht hat. Wenn der Fehler in einer aufgerufenen Prozedur aufgetreten ist, wird die Ausführung ab der Anweisung wiederaufgenommen, die die Prozedur mit der Fehlerbehandlungsroutine als Letztes aufgerufen hat.
Resume Next Wenn der Fehler in der gleichen Prozedur wie die Fehlerbehandlungsroutine aufgetreten ist, wird die Ausführung bei der Anweisung wieder aufgenommen, die direkt auf die den Fehler verursachende Anweisung folgt. Wenn der Fehler in einer aufgerufenen Prozedur aufgetreten ist, wird die Ausführung mit der -Anweisung fortgesetzt, die unmittelbar auf die Anweisung folgt, die zuletzt aus der Prozedur herausgerufen wurde, die die Fehlerbehandlungsroutine (oder die On Error Resume Next-Anweisung ) enthält.
Zeile fortsetzen Die Ausführung wird an der im erforderlichen Zeilenargument angegebenen Zeile fortgesetzt. Das line-Argument ist eine Zeilenmarke oder Zeilennummer und muss sich in derselben Routine befinden wie die Fehlerbehandlungsroutine.

Hinweise

Wenn Sie eine Resume-Anweisung außerhalb einer Fehlerbehandlungsroutine verwenden, tritt ein Fehler auf.

Beispiel

In diesem Beispiel wird mit der Resume -Anweisung die Fehlerbehandlung in einer Prozedur beendet und anschließend die Ausführung ab der den Fehler verursachenden Anweisung wiederaufgenommen. Fehler Nummer 55 wird generiert, um die Verwendung der Resume -Anweisung zu veranschaulichen.

Sub ResumeStatementDemo() 
 On Error GoTo ErrorHandler ' Enable error-handling routine. 
 Open "TESTFILE" For Output As #1 ' Open file for output. 
 Kill "TESTFILE" ' Attempt to delete open file. 
 Exit Sub ' Exit Sub to avoid error handler. 
ErrorHandler: ' Error-handling routine. 
 Select Case Err.Number ' Evaluate error number. 
  Case 55 ' "File already open" error. 
   Close #1 ' Close open file. 
  Case Else 
   ' Handle other situations here.... 
 End Select 
 Resume ' Resume execution at same line that caused the error. 
End Sub

Siehe auch

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.