Você não pode substituir o objeto do erro, mas você pode realizar o que você quer o fazer… apenas tem que incluir a manipulação de erro em cada sub-rotina….
SampleCode secundário público
No erro CatchError empreendedores
'Seu código do subrotine aqui
Retirar o submarino
CatchError:
Err.Raise YourErrorNumber, YourDescription
Submarino da extremidade