我得到下面的代码。我想了解在Excel VBA中的错误处理。了解Excel VBA错误处理
Sub LoopErrorHandling()
Dim ws As Worksheet
Dim c As Range
On Error GoTo LoopErrorHandling_Err
Set ws = ThisWorkbook.Worksheets(1)
ws.Range("C1:C5").ClearContents
For Each c In ws.Range("A1:A5").Cells
c.Offset(0, 2).Value = c.Value/c.Offset(0, 1).Value
Next c
LoopErrorHandling_Exit:
On Error Resume Next
Set ws = Nothing
On Error GoTo 0
Exit Sub
LoopErrorHandling_Err:
MsgBox Err.Description
Resume Next
Resume LoopErrorHandling_Exit
End Sub
我想了解以上代码中的以下内容。
- 应行
Set ws = Nothing
来后或行LoopErrorHandling_Exit:
之前到来。 - 不应该行
LoopErrorHandling_Err:
就够了,是LoopErrorHandling_Exit:
必要的。 LoopErrorHandling_Exit:
上面的代码和 是什么工作,只有在发生错误时才触发。- 以上代码是否涵盖了所有错误处理需要在excel vba或缺少东西。
'设置WS = Nothing'真的不应该在那里的all..'LoopErrorHandling_Exit'是neccessary在这个片段中(*因为没有'退出Sub'标签*之前的任何地方)。'LoopErrorHandling_Exit:'是当'LoopErrorHandling_Exit'被触发或者当正常代码执行到达每个循环之后代码将跳转到的'label',因为没有'Exit Sub' – 2014-10-20 09:41:01
你应该看到[THIS ARTICLE](http://www.cpearson.com/excel/errorhandling.htm) – 2014-10-20 09:45:53
@ vba4all:对不起,没有看到您的评论 – 2014-10-20 09:52:51