Hi Nigel

What I do is to make a private const in each module and in each procedure...
like this

Private Const mstrModuleName As String = "modPrintFeatures"

Public Sub PrintThe****()
Const strProcedureName As String = "PrintThe****"
End Sub

I then use these constants in my err handler.

Hope I helped you a bit
Flemming


"Nigel" wrote in message
...
I am developing a error handling routine and wish to note the name of the
module and sub that was running when the error occurs.

Is this available ?

--
Cheers
Nigel