如何从VBA函数中触发一个错误

我需要从VBA函数中触发（返回）一个错误事件，然后这个函数的调用函数可以触发On Error Go来调用。 例如

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