Hola Ignacio.

Yo creo que sería más sencillo si lo hicieras con un cuadro combinado.

En mi blog http://accessjuancots.blogspot.com en la sección "Ejemplos Varios" tienes uno que se llama cuadro combinado que rellena datos que pienso hace lo que deseas. Este utiliza la propiedad Column de los cuadros combinados

En caso de que necesites que se haga con un cuadro de texto, tienes uno que se llama Autorrelleno con la cédula que también lo hace, en este caso utilizando DLookUp

Un saludo

Hola Juan,

Muchas gracias, la verdad es que me ha servido mucho el ejemplo que me has indicado. Me sale perfectamente, ahora, me gustaría que el cuadro combinado no se desplegase, ya que si no lo hiciera, haría prácticamente la misma función que el cuadro de texto, es decir, se va autocompletando conforme escribo en su interior. ¿Se puede dejar sin que se desplegue? ¿Cómo se oculta la flechita? No sé si me entiendes.

Sólo me falta eso para ver tenerlo todo prácticamente hecho.

Viva Valencia!

Muchas gracias.

Creo que esto te puede servir para lo que quieres, adaptalo a tus necesidades e insertalo en el campo de texto que quieras

Private Sub DNI_AfterUpdate()

'DNI se refiere a tu txt (Textbox)
'para que en caso de que ya este registrada la persona se ponga automaticamente al marcar su DNI
Dim rst As ADODB. Recordset, fld As ADODB. Field
Set rst = New ADODB. Recordset
rst. Open "SELECT DISTINCTROW [Nombre],[1Apellido],[2Apellido] FROM [TuTabla] WHERE [DNI]='" & [DNI] & "'", CurrentProject. Connection, 1, 2
If Not rst. EOF Then
For Each fld In rst. Fields 'recorro los objetos campo del recordset.

'sirve si el cuadro de texto se llama igual que el campo
Me(fld. Name) = fld. Value
Next

'o de una manera de toda la vida
'[NOMBRE] = rst(0)
'[1APELLIDO] = rst(1)
End If
rst. Close
Set rst = Nothing
End Sub

Saludos y espero te sirva

Hola Manolo,

Verás no es un cuadro de texto es un combobox. ¿Se puede hacer que no se pueda desplegar el cuadro combinado de alguna manera?

De todas formas esta parte me interesa:

'o de una manera de toda la vida
'[NOMBRE] = rst(0)
'[1APELLIDO] = rst(1)
End If
rst. Close
Set rst = Nothing
End Sub

¿Asi es como se guardan las variables de los resultados de los campos?

¿Me podrías dar mas información sobre ello?

Es que el cuadro combinado muestra sus resultados correspondientes en cada uno de los textos independientes. Es decir tengo el cuadro combinado " Dni ", que contiene todos los datos de una tabla, y cuando pulsas en un DNI o escribes uno en el cuadro combinado, pues se muestran sus datos en los cuadros de textos independientes. Ahora bien. Tengo una serie de botones, guardar, actualizar, eliminar crear, etc, creados con el asistente que me dicen que no puedo acceder a los registros, y no sé si es porque tengo que guardar esos datos, ya que los cuadros combinados muestran los datos, pero no están enlazados a la tabla para que puedan ser borrados, y no sé como hacerlo.

Creo " me se " entiende :P Sino , os pongo una captura si hace falta.

Muchas gracias por la ayuda!

Hola Buenas, tienes razon, con ese codigo y algo más, recuperarias datos almacenados en los registros de la tabla origen de tu form, sin embargo dices que tienes cuadros de texto independientes, te hare unas preguntas para centrarme un poco mas, ¿No te interesa guardar los datos? En caso de que si te interese guardarlos ¿Sabes relacionar tu form con la tabla origen de los registros? ¿Cuantas tablas tienes creadas en tu bd?.

Es que en realidad no se lo que quieres hacer, no se si es por ejemplo buscar una persona que ya tengas registrada en tu tabla principal o solo algo como simplemente insertar los datos de las personas que tengas en tu tabla personas solo para visualizarlas en tu form.

Contestame y te respondere lo mas claro posible.

Gracias y un saludo