Ayuda access xfavor

Hola tengo un problema con una base de datos, resulta que tengo 2 campos en una tabla "Empleados" que son [idempleado] y [empleado]
Al principio m pidieron en la empresa, que al meter el idempleado, automáticamente me pusiese el empleado en el campo siguiente, entonces escribí el siguiente código
(Private Sub idempleado_Exit(Cancel As Integer)
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb()
Set rs = db.OpenRecordset("Empleados", dbOpenDynaset)
rs.FindFirst "[idempleado]=" & Me![idempleado]
If Not rs.NoMatch Then
Me![empleado] = rs!empleado
End If
rs.Close: db.Close
Me! Origen.SetFocus
Y me funcionaba, pero ahora me piden que en vez del idempleado, es mejor meter el empleado, pero con un cuadro combinado, para que al meter un par de letras ya poder seleccionar el empleado, y entonces que automáticamente me ponga el id empleado en el siguiente campo,
en el código yo pongo lo mismo en el evento al salir del campo empleado, pero intercambiando donde pone empleado por idempleado y viceversa,
pero no me funciona
por favor ayuda!
Muchas gracias

1 respuesta

Respuesta
1
Para esto, en principio, no tienes ni que escribir código.
Supongo que tienes un formulario por medio del que completas los datos.
De todas formas crea uno de prueba cuyo origen de los datos es la tabla empleados para que veas como funciona
Pon un cuadro de texto con el id_empleado
Crea un cuadro combinado con el asistente, el origen será la tabla empleados, ocultará el id y ordena por el nombre del empleado, cuando te pregunte, señala almacenar en el campo Id_emplado.
Escribe la primera/s letras del empleado en el cuadro y verás que el id_empleado aparece.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas