Botón Deshacer y Cancelar Access

Tengo un formulario con un botón GUARDAR Y CERRAR y con otro llamado CANCELAR Y CERRAR

El primero me funciona bien. Pero el segundo, sólo me funciona cuando en el formulario activo ha habido cambios que luego el usuario desea cancelar. Si solo ha consultado pero no ha modificado nada, y por error, el usuario le da a CANCELAR en vez de a GUARDAR Y CERRAR, me tira erró de depuración.

El código del botón Cancelar es el siguiente:

Private Sub Boton_Cancelar_Click()
DoCmd.RunCommand acCmdUndo
DoCmd.Close
End Sub

¿Cómo puedo hacer para que antes de realizarme el undo, compruebe si realmente ha habido modificación en el formulario? Quiero que se quede algo parecido a esto:

Private Sub Boton_Cancelar_Click()

If (ha habido modificaciones) then
DoCmd.RunCommand acCmdUndo

endif

DoCmd.Close
End Sub

Añade tu respuesta

Haz clic para o