Hi Colin

In your ON ERROR , routine make this :

If error = ( number , see help , error Uniqueness of index key violated )

wait window "Your message , to say to end user that input is invalid "

Endif


I hope this help you