Problema con el código en botón de cerrar formulario
Buenas noches, tengo un formulario en el cual navego por los registros para consultar datos, editarlos si es necesario y tengo un botón para crear un nuevo registro, otro para guardar los datos y otro para cancelar con el siguiente código ya que cada vez que creo un socio nuevo me busca en la tabla socios y me suma uno al ultimo que hay registrado de hay que pusiera como condición el campo nombre pero si estoy navegando por los registros y quiero cerrar el formulario no sale porque cumple la condición.
Si alguien me puede plantear una solución para el código lo agradecería.
On Error GoTo Err_Cerrar_Click If IsNull(Me.Nombre) Then DoCmd.RunCommand acCmdUndo DoCmd.Close acForm, Me.Name, acSaveNo End If Exit_Cerrar_Click: Exit Sub Err_Cerrar_Click: MsgBox Err.Description Resume Exit_Cerrar_Click
1 respuesta
Respuesta de Sveinbjorn El Rojo
1
Prueba así:
On Error GoTo Err_Cerrar_Click If IsNull(Me.Nombre) Then DoCmd.RunCommand acCmdUndo End If DoCmd.Close acForm, Me.Name, acSaveNo Exit_Cerrar_Click: Exit Sub Err_Cerrar_Click: MsgBox Err.Description Resume Exit_Cerrar_Click
o así:
On Error GoTo Err_Cerrar_Click If Me.NewRecord Then DoCmd.RunCommand acCmdUndo End If DoCmd.Close acForm, Me.Name, acSaveNo Exit_Cerrar_Click: Exit Sub Err_Cerrar_Click: MsgBox Err.Description Resume Exit_Cerrar_Click
