Question

我需要从VBA函数触发（返回）错误事件，然后该函数的调用函数可以触发On Error Go来调用。 E.g

function Test()
 On Error Go to myError:
       TestErr()
 Exit Function

 myerror:
    Test = "Error Triggered"
End Function

Function TestErr()
    ?? 'How to Trigger error here
End Function

谢谢

Answer 1

Err.Raise 5，“可选错误来源”，“可选错误说明”

MSDN参考http://msdn.microsoft.com/en-us/library/aa164019%28office.10%29.aspx#odc_tentipsvba_topic3

Answer 2

肮脏的方式：1 / 0

Answer 3

不是您提出的问题，但请注意，如果要将错误从UDF返回到单元格，请使用CVErr。像

Test = CVErr(xlErrNA)

返回#NA

如何从VBA函数触发错误

3 个答案: