How to Trigger a Error from a VBA function

Question

hi,

I need to trigger(return) an error event from a VBA function, then the calling function of this function can trigger On Error Go to call. 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

Thank You

Answer 1

Err.Raise 5, "optional error source" , "optional error description"

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

Answer 2

Dirty way: 1 / 0

Answer 3

Not what you asked, but note that if you want to return an error to a cell from a UDF, use CVErr. Like

Test = CVErr(xlErrNA)

to return #NA