¿Es posible que a través de un cuadro de texto de un formulario buscado con dlookup, que me actualice un campo de una tabla?
Os pongo el código a ver que es lo que hago mal (entiendo que debería ser posible), funciona todo correctamente excepto la última línea If me. Cierre …:
En ella yo lo que pretendo es que si el cuadro de texto Cierre (calculado en la línea anterior del código), es menor que el campo hora_llegada (este me lo pone después de insertar en el formulario a través de un Now) entonces que me actualice la consulta clasificaciones fuera de control y que me ponga en el campo incidencias "fuera de control"
Private Sub Dorsal_BeforeUpdate(Cancel As Integer)
If DLookup("[CATEGORIA]", "[DATOS PRUEBA]", "DORSAL=" & Me.Dorsal) = "No sale" Then
MsgBox "ESE CORREDOR NO TOMÓ LA SALIDA"
Cancel = True
End If
Nombre = DLookup("[NOMBRE]", "[DATOS PRUEBA]", "DORSAL=" & Me.Dorsal)
Cierre = DLookup("[CIERRE_META]", "[CIERRE META]", "DORSAL=" & Me.Dorsal)
If Me.Cierre < Me.Hora_llegada Then CurrentDb.Execute "update[clasificaciones fuera de control] SET incidencias='Fuera de control'"
End Sub