在VBA中,有几种方法可以提前结束Sub过程: 使用Exit Sub语句: Exit Sub语句是最直接和常用的方法来提前结束Sub过程。当执行到Exit Sub时,Sub过程会立即终止,并且控制权会返回到调用Sub过程的地方。 使用End Sub语句: 虽然End Sub通常用于标记Sub过程的结束,但在实际编程中,我们并不使用它来提前结束Sub过程,因为它...
第一部分:END语句与Exit语句 一、END语句 作用:强制退出所有正在运行的程序。 二、Exit语句 作用:退出指定的语句 例:执行x从1到100,当x=5时停止: 1、Exit Sub(退出整个sub) Sub e1() Dim x As Integer For x = 1 To 100 Cells(1, 1) = x If x = 5 Then Exit Sub End If Next x End Sub ...
VBA的 程序终止、退出语句块、分支及错误处理( End,exit,onerrorgotoinVBA 代码1: 程序终止及退出方法 1 Option Explicit 2 3 '一、END语句 4 5 '作用:强制退出所有正在运行的程序。 6 7 '二、Exit语句 8 9 '退出指定的语句 10 11 '1、Exit Sub 12 Sub e1() 13 Dim x As Integer 14 For x = ...
在上述示例中,如果rangeValue的值为0,则会执行Exit Sub语句,从而提前结束Sub过程。否则,会继续执行其他代码。 需要注意的是,Exit Sub只能用于结束当前的Sub过程,并不能结束整个程序的执行。如果需要结束整个程序的执行,可以使用Exit Sub之后跟着End语句来实现。
一、END语句 作用:强制退出所有正在运行的程序 二、Exit语句 作用:退出指定的语句 1.Exit Sub 1 Sub e1() 2 Dim x as Integer 3 For x = 1 to 100 4 Cells(1,1) = x 5 If x = 5 Then 6 Exit Sub 7
在VBA中,使用Exit Sub语句的一般语法如下: 代码语言:txt 复制 Sub ProcedureName() ' 代码块 If condition Then ' 条件满足时执行的代码 Exit Sub ' 提前退出当前的子过程 End If ' 代码块 End Sub 在上述代码中,如果条件满足,则会执行Exit Sub语句,跳出当前的子过程,不再执行后续的代码。 Exit Sub语句的...
Exit Sub立即退出显示它的Sub过程。 继续执行称为Sub的过程之后的语句。 备注 请勿将Exit语句和End语句搞混。Exit不定义结构的末尾。 示例 此示例使用Exit语句退出For...Next循环、Do...Loop和Sub过程。 VB复制 SubExitStatementDemo()DimI, MyNumDo' Set up infinite loop.ForI =1To1000' Loop 1000 times....
代码1: 程序终止及退出方法 1 Option Explicit 2 3 '一、END语句 4 5 '作用:强制退出所有正在运行的程序。 6 7 '二、Exit语句 8 9 '退出指定的语句 10 11 '1、Exit Sub 12 Sub e1() 13 D
): i = 2: Do While works.Cells(i, 1) <> "" '没有找到且数据不为空时进入查找循环 If InStr(works.Cells(i, 4), "申请中") <> 0 Then works.Range(Cells(i, 1), Cells(i, 4)).Interior.Color = vbGreen Exit Do '找到了第一个数据,退出do循环 End If i = i + 1 Loop End Sub...
VBA笔记退出循环、Sub、Fuction等的Exit语句 Exit语句,可以用来跳出、退出各种循环。以下是几种VBA循环及过程、函数等的退出语句代码。 一、For循环的退出 For Each myCell in Range("A1:H10") If myCell.Value = "" Then myCell.Value = "empty" Else Exit For End If Next myCell 以上是For Each的退出...