run time errors

N

New TO Access

Am I able to intercept run-time error messages and replace them with a more
meaningful message of my own? If so, how?

Thanks
 
A

Alex Dybenko

yes, sometihing like this:

Sub Test()
On error go to Proc_Err

'run some code here

Proc_Exit:
exit sub
Proc_Err:
select case err.number
case 5
msgbox "Custom error message"
case else
msgbox err.descrition
end select
resume Proc_Exit
end sub

so if you get err.number=5 - then user will get a messagebox with "Custome
error message"
 
Top