Access - captura error 3022

hola a todos ... mi problema es el sgte ...
private sub form_beforeupdate(cancel as integer)
on error goto existe
if me.newrecord then
me.numero=1+ dmax("numero","contador")
endif
exit sub

existe:
if err.number=3022 then
me.numero=2+dmax("numero","contador")
else
resume next
endif
end sub

ahora el problema en si es que no logro capturar el bendito error 3022 llegando hasta el final del codigo apareciendo el mensaje " los cambios solicitados no se ............." , les detallo que esto es en access en un subform secundario e intentado todo a mi alcance y nada esto es para un correlativo multiusuario ... les agradeceria su valiosa ayuda