Ingresar el valor de un elemento de mi listbox en un textbox de otro formulario de VBA
Al dar doble click a un elemento de mi listbox, necesito que se abra otro userform en el cual en un textbox me copie el valor de la primer columna del elemento seleccionado.
Formulario de listbox "Alerta"
Aquí me muestra elementos con una condición, al dar doble click sobre un elemento necesito que se abra el siguiente formulario:
Formulario de búsqueda "INICIO"
Donde en el textbox con etiqueta "Claim" me copie el valor de la primer columna del elemento seleccionado, que seria la columna llamada "No."
2 Respuestas
Te dejo la macro. Allí debes reemplazar el nombre de los controles (listbox1, userform2 y textbox1) por los tuyos:
Si te ofrece alguna dificultad no dudes en solicitar mayores aclaraciones... sino valora la respuesta (opciones: excelente o buena)
Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean) 'x Elsamatilde 'si no hay datos seleccionados se cancela If ListBox1.ListIndex < 0 Then Exit Sub 'se envian los datos a cada campo del Userform2 o como se llame el de Modificar UserForm2.TextBox1 = ListBox1.List(ListBox1.ListIndex, 0) UserForm2.Show End Sub
Una disculpa por no mencionarlo, pero de mi formulario de búsqueda "INICIO", tengo un multipage con 2 páginas, y la que necesito es la página 2.
En esta página muestra la imagen que adjunte al inicio.
Saludos y gracias por la pronta respuesta ...
La línea donde se envía el elemento seleccionado debe indicar el page.
UserForm2. MultiPage1. Pages(1).TextBox1 = ListBox1. List(ListBox1. ListIndex, 0)
Ajusta el nombre del UF, del Multipage, del Textbox y del Listbox.
Si es la 2da pestaña el valor es 1 porque se empieza a numerar de 0, lo mismo que la 1er columna del Listbox.
Sdos y no olvides valorar la respuesta (opciones: excelente o buena).
Elsa
http://aplicaexcel.galeon.com/manuales.htm
PD) todo lo que necesitas saber sobre Listbox lo encontrarás en capítulo 8 y lo de Multipage en capítulo 18 de mi manual de Userforms ;)
Este ejemplo hace lo que necesitas
Fíjate que cuando selecciones el cliente del listbox se traslada al textbox
Visita https://programarexcel.com descarga cientos de ejemplos de macros gratis
suscribe https://www.youtube.com/c/programarexcel?sub_confirmation=1 activa la campana y youtube te avisará cuando se suban nuevos vídeos