实在看不懂，不知道为什么用 on error resume next?

jermy19761982 · 发表于 2019-9-22 11:15

Sub 找名字在第一个表单()

Dim i, j, a, k, arr

arr = Sheets(1).Range("A1:A7")

on error resume next

i = WorksheetFunction.Match("王四", arr)

If i > 0 Then MsgBox "存在" Else MsgBox "不存在"

End Sub

YZC51 · 发表于 2019-9-22 14:48

遇到错误继续执行下一句代码！

jermy19761982 · 发表于 2019-9-22 17:28

YZC51 发表于 2019-9-22 14:48
遇到错误继续执行下一句代码！

可是，怎么可能会遇到错误呢？好想没有出错误的逻辑呀

YZC51 · 发表于 2019-9-22 20:18

jermy19761982 发表于 2019-9-22 17:28
可是，怎么可能会遇到错误呢？好想没有出错误的逻辑呀

一般为了程序容错！

		自动登录	找回密码
密码			免费注册