Asignar a textbox valor columna 0 de listbox
Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=86882
Fecha de impresión: 26/Marzo/2026 a las 20:58
Tema: Asignar a textbox valor columna 0 de listbox
Publicado por: marioboss
Asunto: Asignar a textbox valor columna 0 de listbox
Fecha de publicación: 06/Marzo/2024 a las 13:49
Buenos días!
Vuelvo al mundillo de VBA y Access y me ha surgido una duda que, seguro que es simple, pero no doy con ello:
Quiero asignar a un textbox (TxtNombre) el valor de la columna 0 de un registro que he seleccionado de un listbox (List1).
He escrito esta línea de código, pero al ejecutar el formulario, en el textbox me aparece #Nombre?
Me.TxtNombre.ControlSource = "SELECT [Personal].[Nombre] FROM Personal WHERE (([Personal].[Usuario]) = '" & Me.List1.Column(0) & "')"
No consigo hallar el problema...
Muchas gracias de antemano por vuestra ayuda!
------------- "Solo hay dos cosas infinitas en la vida, una el universo y la otra la estupidez de los humanos, aunque de la primera no estoy seguro del todo."Albert Einstein.Saludos a todos los foreros.
|
Respuestas:
Publicado por: Mihura
Fecha de publicación: 06/Marzo/2024 a las 15:14
Si es un TextBox no le puedes asignar una SELECT como Source, eso sólo vale para un ComboBox o un ListBox.
------------- Jesús Mansilla Castells. Saludos desde Móstoles.
http://www.accessaplicaciones.com" rel="nofollow - Access Aplicaciones http://www.tecsys.es" rel="nofollow - Tecsys.es
|
Publicado por: marioboss
Fecha de publicación: 12/Marzo/2024 a las 14:06
Muchas gracias por la respuesta, Jesús. Por este lado, todo claro. Finalmente, lo he resuelto así:
Me.TxtNombre = DLookup("[Nombre]", "Personal", "[Usuario] = '" & Me.List1.Column(0) & "'")
Muchas gracias de nuevo y se puede cerrar el hilo.
------------- "Solo hay dos cosas infinitas en la vida, una el universo y la otra la estupidez de los humanos, aunque de la primera no estoy seguro del todo."Albert Einstein.Saludos a todos los foreros.
|
|