在VBA中,使用Exit Sub语句的一般语法如下: 代码语言:txt 复制 Sub ProcedureName() ' 代码块 If condition Then ' 条件满足时执行的代码 Exit Sub ' 提前退出当前的子过程 End If ' 代码块 End Sub 在上述代码中,如果条件满足,则会执行Exit Sub语句,跳出当前的子过程,不再执行后续的代码。 Exit Sub语句的...
此示例使用Exit语句退出For...Next循环、Do...Loop和Sub过程。 VB复制 SubExitStatementDemo()DimI, MyNumDo' Set up infinite loop.ForI =1To1000' Loop 1000 times.MyNum = Int(Rnd *1000)' Generate random numbers.SelectCaseMyNum' Evaluate random number.Case7:ExitFor' If 7, exit For...Next....
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的退出...
For Each myCell in Range("A1:H10") If myCell.Value = "" Then myCell.Value = "empty" Else Exit For End If Next myCell 以上是For Each的退出方法。如果是For to 结构的循环,同样使用Exit For语句来退出。 二、Do 或 Do While语句的退出 使用Exit Do语句退出。 三、退出Sub过程 使用Exit Sub语...
Sub Example() Dim rangeValue As Integer rangeValue = 5 ' 假设范围值为5 If rangeValue = 0 Then Exit Sub ' 如果范围值为0,则结束Sub过程 End If ' 继续执行其他代码 End Sub 在上述示例中,如果rangeValue的值为0,则会执行Exit Sub语句,从而提前结束Sub过程。否则,会继续执行其他代码。
1 exit 用法的简要总结 1.1 具体用法 exit do ' 用在do loop 循环里 exit for ' 用在 for next 循环里 exit sub ' 用在sub里 exit function ' 用在function里 exit propperty '?? 1.2 错误的用法 exit '不能单独使用 exit if '一般并没有必要跳出 if 吧 ...
IF Else 分支结构 单条件判断 If 条件成立 Then 执行语句 End If '也可以写成一行 '但不推荐这样做,在复制代码到其他文档时自动缩进会出错 If 条件成立 Then 执行语句 双分支判断 If 条件成立 Then 执行1 Else 执行2 End If '也可以写成一行 '但不推荐这样做,在复制代码时无法自动缩进 ...
Sub t2() Dim x As Integer For x = 1 To 10 If Cells(x, 1) Mod 2 = 0 Then GoSub 100 '如果Cells(x, 1)能被2整除,跳到100标记下的语句;如不是,x+1;如x=10都没遇到偶数,结束程序。 Next x Exit Sub 100: Cells(x, 1) = "偶数" ...
Exit Sub ' Exit Sub immediately. End If Area = Length * TheWidth ' Calculate area of rectangle. Debug.Print Area ' Print Area to Debug window. End Sub 另请参阅 调用Sub 和 Function 过程 了解命名参数和可选参数 编写Sub 过程 数据类型 语句 支持和反馈 有关于 Office VBA 或本文档的疑问...
(1)、End结束语句:End语句可以单独使用,也可以结合部分控制关键字使用,如Function、If、Select、Sub、With等。End语句用于立即结束一个过程或者块,它提供了一种强制中止程序或结束语句块的方法。End语句结合不同控制关键字时的使用方法如下表: 示例: (2)、Exit结束语句:Exit语句用于强制退出Do-Loop、For、Function函...