金字塔VBA如何捕捉错误?

技术008

语法就寥寥几行



Sub OnErrorStatementDemo()
------可能出现错误的代码----
On Error Resume Next ' 打开错误捕获。
------- 错误处理程序。-------
Resume ' 将控制返回到产生错误的语句。
End Sub

具体看这个帖子http://www.weistock.com/bbs/disp ... p;page=0&star=2