EXCEL表格中使用VBA错误捕捉On Error Goto的两种方法
VBA中错误捕捉的方法主要有两种
第一种捕捉方法:
1、语法:
On Error GoTo Err_Handle '如果遇到错误就跳转到错误处理代码
语句xxxxx
Exit Sub/Function(如果没有这条语句,即使没有错误也会执行错误处理语句)
Err_Handle: 语句 xxxxxx
2、举例:
Sub 查找数字() ’本段代码查找电子表格中有没有数字12
On Error GoTo Err_Handle
MsgBox Cells.Find(12).Address
Exit Sub '如果没有这个退出过程语句,会一直执行下去
Err_Handle:
MsgBox ("不存在该数字")
End Sub
(1)、电子表中数据和代码
(2)、查找12的结果:
(3)、查找13的结果:
第二种捕捉方法:
1、语法:
On Error Resume Next '如果遇到错误,不管错误,继续往下执行,但如果嵌套了其他错误处理语句,这些错误处理语句还是会按照自己规则运行
语句xxxx
On Error GoTo 0 ’结束错误捕捉
2、举例代码:
Sub 查找数字()
Dim i As Integer
On Error Resume Next '遇到错误向下执行
MsgBox Cells.Find(13).Address
On Error GoTo Err_Handle
i = 10 / 0 ’会跳转到错误处理语句,而不会运行 Exit sub
Exit Sub
Err_Handle:
MsgBox i
On Error Resume Next
End Sub
3、结果说明和图例:
excel表中没有13这个数字,但是不会报错也不会有弹窗
在On Error Resume Next 和 Err_Handle之间代码,还是可以发挥错误捕获功能,因此可以出现下面弹窗:
相关推荐:
相关文章
- 这篇教程是向脚本之家的朋友分享excel中MAX和MIN函数的几种不同使用方法,教程真的很不错,很值得大家学习,很适合新手来学习,推荐过来,一起来学习吧2016-02-16
- EXCEL中怎么使用asc全角转半角函数?在输入的字符的时候,基本上输入法的默认情况是半角输入的,在excel中有一个快速转换全角半角的函数asc,下面分享详细的解决办法2016-02-16
- 这篇教程是向脚本之家的朋友分享excel簇状柱形图的变形,教程真的很不错,很值得大家学习,推荐到脚本之家,有兴趣的朋友快快来学习吧2016-02-16
- 如果你是在办公室上班或者是文员等,这个是很有用的哈,下面小编就为大家汇总excel表格编辑技巧,一起来看看吧2016-02-15
- 下面小编就为大家分享在Excel中常用函数将多列文字合并到一列方法,对于不知道怎么操作的朋友可以参考本文,希望能对大家有所帮助2016-02-15
- Excel表格怎么到dat文件数据?工作中经常需要处理dat数据,怎么才能把dat数据导入excel呢?下面分享Excel表格导入dat文件数据的详细步骤,需要的朋友可以参考下2016-02-15
- Excel高手的世界,我们初触excel的同学们,真还不懂。高手们在编写excel函数公式,经常会玩大括号({})、双减号(--)、百分号(%)、连接空值(&"")等等稀奇古怪的符号,2016-02-16
最新评论