On Error GoTo

悠扬的旋律 · 发表于 2024-7-13 21:41

本帖最后由悠扬的旋律于 2024-7-14 10:15 编辑

一个过程里只能跳一次吗
还是我没用对
这个语句只能第一个错误跳转吗
不能一直跳转吗
我想让它一直忽略错误,遇到错误就跳转

Sub Macro29()
On Error GoTo 1 '如果遇到错误，就跳到那一行
For 第几行 = 1 To 4
数字 = Cells(第几行, 1)
变量 = 1 / 数字
Cells(第几行, 2) = 变量
1:
Next
End Sub

复制代码

micch · 发表于 2024-7-13 22:57

加一个err.clear

悠扬的旋律 · 发表于 2024-7-14 06:47

micch 发表于 2024-7-13 22:57
加一个err.clear

你看我第二张图加了也不行啊

ynzsvt · 发表于 2024-7-14 08:01

两个代码都可以，自己选用一个。

Sub Macro29()
On Error Resume Next '如果遇到错误，就跳到那一行
For 第几行 = 1 To 10
数字 = Cells(第几行, 1)
变量 = 1 / 数字
If Err.Number <> 0 Then
Err.Clear
Else
Cells(第几行, 2) = 变量
End If
Next
End Sub
Sub Macro30()
For 第几行 = 1 To 10
On Error Resume Next '如果遇到错误，就跳到那一行
数字 = Cells(第几行, 1)
变量 = 1 / 数字
If Err.Number <> 0 Then
Else
Cells(第几行, 2) = 变量
End If
Next
End Sub

复制代码

wang-way · 发表于 2024-7-14 08:46

在标签1下一句加上 on error goto 0 这语句是恢复对错误的捕获。

wang-way · 发表于 2024-7-14 08:48

还可以这样组合使用
on error resume next
这里放可能出错的语句
on error goto 0

悠扬的旋律 · 发表于 2024-7-14 09:11

wang-way 发表于 2024-7-14 08:46
在标签1下一句加上 on error goto 0 这语句是恢复对错误的捕获。

你看第3张图加了也不行啊

悠扬的旋律 · 发表于 2024-7-14 09:20

wang-way 发表于 2024-7-14 08:48
还可以这样组合使用
on error resume next
这里放可能出错的语句

On Error Resume Next我大概会用
我想问问On Error GoTo怎么用
因为On Error GoTo更方便,报错就跳转,不用考虑错误是在哪里
忽略错误的话比较麻烦
不行的话就先用On Error Resume Next凑合一下

lss001 · 发表于 2024-7-14 09:38

本帖最后由 lss001 于 2024-7-14 09:41 编辑

悠扬的旋律发表于 2024-7-14 09:20
On Error Resume Next我大概会用
我想问问On Error GoTo怎么用
因为On Error GoTo更方便,报错就跳转,不 ...

Sub Macro29()
For 第几行 = 1 To 4
      变量  = "" ' 初始化变量：*重要*
      On Error GoTo 1
      '如果遇到错误，就跳到那一行
      数字 = Cells(第几行, 1)
      变量 = 1 / 数字
      Cells(第几行, 2) = 变量
1:
      Resume Next '继续跳转错误
Next
End Sub

wang-way · 发表于 2024-7-14 09:52

Sub Macro29()
For 第几行 = 1 To 4
      变量  = "" ' 初始化变量：*重要*
      On Error GoTo 1
      '如果遇到错误，就跳到那一行
      数字 = Cells(第几行, 1)
      变量 = 1 / 数字
      Cells(第几行, 2) = 变量
1:
      on error goto 1 '继续跳转错误
Next
End Sub

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

[求助] On Error GoTo

评分