UDF/VBA Function, trap error, avoid #VALUE!
I have created a new function to try to recreate an example function
that mimics my intent:
Public Function HelloWorld(causeError As Boolean) As String
On Error GoTo ErrorHandler
If (causeError) Then
Err.Raise 1234
Else
HelloWorld = "Hello World"
End If
FunctionExit:
Exit Function
ErrorHandler:
Err.Clear
HelloWorld = "ERROR HAPPENED"
Resume FunctionExit
End Function
=HelloWorld(FALSE) returns "Hello World"
=HelloWorld(TRUE) returns #VALUE!
|