Access - metodo undo

Hola a todos.

Estoy utilizando el metodo undo en un formulario para que me avise al salir de que se han registrado cambios. El caso es que el mismo formulario lo utilizo en modo agregar datos que para el modo editar datos y claro no queda muy.

Quisiera que cuando entro en "modo agregar datos", es decir con el formulario vacio, cuando termine de introducir la información al salir no me avise. El código que utizo es este de abajo.

Dim MENSAJE, Estilo, Título, respuesta
MENSAJE = "El registro ha sido modificado" & vbCrLf _
& "¿De verdad quiere confirmar los cambios?"
Estilo = vbYesNo + vbCritical + vbDefaultButton2
Título = "¡ATENCIÓN A LOS CAMBIOS!"
respuesta = MsgBox(MENSAJE, Estilo, Título)
If respuesta = vbYes Then
Exit Sub
Else
Cancel = True
Me.Undo
End If

Muchas gracias.

Hola.

El código que utizo es este de abajo.

Ya, pero no dices dónde. Conviene que al copiar incluyáis el Private Sub...

Es de suponer que es en Form_BeforeUpdate. Si es así, añade al principio del procedimiento If Not Me.NewRecord Then...

Un saludo.

Hola Norberto.

Evidentemente el evento es en "despues de actualizar", daba por hecho que lo sabias.

Pero tu tampoco me has cerrado el If. Bueno, bromas a parte, muchas gracias por todo Norberto, ahora si funciona como debia ser.

Saludos blas.

Muy buenas Blas:

Aunque con ironía, contestas y agradeces las soluciones, que no es algo que abunde por este foro. Estoy pensando en hacer una lista negra de quienes no lo hacen y no volver a responderlos ya que no sabes si las molestias que te tomas sirven para algo y pueden ser útiles para otros.

Me alegro de haberte dado una solución y de tu respuesta.

Un saludo y buen finde si allá por donde vives te acompaña el tiempo.