cancelevent docmd

Hola, He programado esto Private Sub retorno_no_confirmado_BeforeUpdate(Cancel As Integer) Asignado End Sub y la funcion es: Private Sub Asignado() 'MsgBox ("Entrada") If Me.asigRetorno = False Then Me.asigRetorno = True 'Refrescar ...