Visual Basic - como saber qué funcion o sub provoca un error

Buenas, he creado un pequeño formulario donde, en caso de que se produzca algún error, muestre el err.num, err.description, me.name(nombre del formulario),... pero sería muy interesante incluir el sub o function donde se provocó el error. y de forma genérica, por ejemplo en todos los sub ponemos

private sub blablabla()
on error goto mierror
....
....

exit sub
mierror:
muestraerror(err.num, err.description, me.name, aqui)
end sub

Y donde "aqui" no tenga que modificarlo para cada función, sino que sea como los parametros anteriores que son los missmos para todos los sub

fitetu