Exit Instruction
Syntax
Exit {All|Do|For|Function|Property|Sub|While}
Group
Description
The exit instruction causes the macro to continue with out doing some or all of the remaining instructions.
Parameters
Exit | Description |
---|---|
All | Exit all macros. |
Do | Exit the Do loop. |
For | Exit the For or For Each loop. |
Function | Exit the Function block. Note: This instruction clears the Err and sets Error`$' to null. |
Property | Exit the Property block. Note: This instruction clears the Err and sets Error`$' to null. |
Sub | Exit the Sub block. Note: This instruction clears the Err and sets Error`$' to null. |
While | Exit the While loop. |
Example
Sub Main L$ = InputBox$("Enter Do, For, While, Sub or All:") Debug.Print "Before DoSub" DoSub UCase$(L$) Debug.Print "After DoSub" End Sub Sub DoSub(L$) Do If L$ = "DO" Then Exit Do I = I+1 Loop While I < 10 If I = 0 Then Debug.Print "Do was entered" For I = 1 To 10 If L$ = "FOR" Then Exit For Next I If I = 1 Then Debug.Print "For was entered" I = 10 While I > 0 If L$ = "WHILE" Then Exit While I = I-1 Wend If I = 10 Then Debug.Print "While was entered" If L$ = "SUB" Then Exit Sub Debug.Print "Sub was not entered." If L$ = "ALL" Then Exit All Debug.Print "All was not entered." End Sub