A中call子程序B，那么B仍然是在A这个外层程序内。B执行完后会返回A部分继续往下执行，这个时候你可以理...
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 2、Exit function(退出整个function) Function ff() Dim x As Integer For x = 1 To 100 If x = 5 Then Exit Function End If Next x End F...
正常情况下,VBA 过程以 Sub 语句开始,以 End Sub 语句结束。但有时根据实际情况,可能需要提前结束并退出过程。VBA 提供 2 种提前退出过程的方法,Exit Sub 和 End 方法。 Exit Sub 语句 在一个过程中,当程序运行到 Exit Sub 语句时,立即结束当前过程,提前退出。 Sub Main() Call MySub Msgbox "父过程" En...
一、END语句 我们在写If函数、过程或自定义函数的时候,最后一句总是End If 或 End Sub或End Function,这里End的意思是强制退出所有正在运行的程序,包括这段代码中的一切窗体。 二、Exit语句 不同于End,Exit的退出稍微轻一些,它只退出指定的语句。 Exit语句是为了在符合某种情况的时候退出,所以必然是跟If判断一起...
1、退出过程——Exit Sub 2、退出函数——Exit function 3、退出for循环——Exit for 4、退出do循环——Exit do 三、Goto语句 跟其它语言一样,VBA也给出了Goto语句,它有自己的特色,还是遵从大牛们讲的,不到不得已,尽量不使用Goto语句,因为那样跳来跳去的程序的可读性差,维护较麻烦。
下面是一个示例代码,演示了如何在Sub外部处理Excel VBA中的错误: 代码语言:txt 复制 Sub HandleError() On Error GoTo ErrorHandler ' 执行可能会出错的代码 ' ... Exit Sub ' 如果没有错误,直接退出Sub ErrorHandler: ' 处理错误的代码 MsgBox "发生错误:" & Err.Description, vbCritical Resume Next ' 继...
3.Sub 表示过程的开始。 4.过程名称 每个Sub过程必须有一个名称。其命名规则与变量相同,参见《Excel VBA解读(15):变量和常量》。通常,过程名称最好能简单表达该过程的作用。 5.End Sub 表示过程的结束。 使用规则 1.如果模块开头放置了Option Private...
退出Do…Loop块、For…Next、Function、Sub或Property代码。 语法 Exit Do Exit For Exit Function Exit Property Exit Sub Exit语句具有以下语法形式: 展开表 语句说明 Exit Do提供退出Do...Loop语句。 只能在Do...Loop语句内使用它。Exit Do将控制权转移给Loop语句之后的语句。 在嵌套的Do...Loop语句内使用时...
MsgBox"File not found or error occurred."Exit Sub End If ' 获取内容 content=wb.Sheets(1).Range("A1").Value2 MsgBox content wb.Close SaveChanges:=False MsgBox"Done!"End Sub 使用GetObject函数,获取对指定Excel文件的引用。如果Excel文件尚未打开,那么程序会在后台打开该工作簿。
Exit Sub 当密码不正确,弹出一个对话框"密码错误,不可以非法运行程序!"然后退出程序。 4)由于代码是按顺序执行的,在上述代码执行过程中,如果没有Exit Sub(退出程序),那么说明密码校验是正确的,代码将继续执行,开始程序主体部分代码的运行。 下面我们来看一下代码的执行效果,我们仍旧建立一个运行按钮,关联上述过程,...