RE:detectar registro duplicado
Luca, en la tabla el DNI lo pones como indexado, sin tener duplicados. Bien cuando introduces un DNI igual Access te saca un mensaje, que tu puedes modificar así:
Private Sub Form_Error(DataErr As Integer, Response As Integer)
'Debug.Print "DataErr = "; DataErr 'el error de duplicados es el 3022
' el error que dice no puede guardar el registro es 2169
If DataErr = 3022 Then
MsgBox " Este DNI ya está introducido ," & Chr(13) & "no es válida la entrada porque se repite ", vbCritical, "ERROR ENTRADA DE DATOS"
SendKeys "{ESC 2}"
dni.SetFocus
Response = acDataErrContinue
Else
Response = acDataErrDisplay
End If
End Sub
El error que genera Access es el 3022, y tú modificas el mensaje como te indico arriba. La línea Debug.Print............., es para localizar los errores de Access en la pantalla inmediato del código, y luego tú lo haces el mensaje a tu gusto.
Espero te sirva, saludos