You can use the old Erl syntax, a remnent from old basic BUT not documented.
VB.NET still has this and it is documented.

Sub ErrLineExample()

On Error GoTo ErrorHandler
Dim intAge As Integer
Dim i As Integer
Dim str As String

10 intAge = "MyAge"
20 '//
30 i = 1 / 0
40 str = "Test"
50 i = str
60 '
70 '


Exit Sub
ErrorHandler:
MsgBox Err.Description & " Error occurred at line : " & Erl()
Err.Clear
Resume Next

End Sub

(Michel) wrote in message . com...
If I use the 'On Error Goto' to send a report by email how can I
include the line code that caused the error?

And how can I still go to the vba-code-line to debug it?

It seems Err. is missing something like Err.Line or Err.Code.....