Evento Doble Clic o Clic sobre contenido de ListBox
Tengo un userform que me carga un ListBox el cual, actualmente, para que me muestre la información asociada a cada línea de texto del ListBox debo dar clic a un botón para que muestre la información dentro del UserForm. Deseo evitar dar clic sobre ese botón y hacer que al dar doble clic o hacer clic sobre el contenido del ListBox automáticamente se cargue la información asociada.
Agradezco la ayuda de cual es la línea de código que debo utilizar.
1 respuesta
[Hola Alberto.
Aquí te dejo un ejemplo. Doy por hecho que quieres que al seleccionar un Itten en el ListBox, pase los datos a las differentes cajas de texto.
Si es correcto, solo debes cambiar los nombres de los TextBox y ListBox por los que tengas.
El código lo colocas dentro del evento click del Listbox.
Private Sub ListBox1_Click() Cargar = ListBox1.ListIndex TextBox1 = ListBox1.List(Cargar, 0) TextBox2 = ListBox1.List(Cargar, 1) TextBox3 = ListBox1.List(Cargar, 2) TextBox4 = ListBox1.List(Cargar, 3) TextBox5 = ListBox1.List(Cargar, 4) End Sub
Salu2 Carlos Arrocha
@Alberto Mora Perea: Hola Alberto, me gustaría enviarte el código de la Lupa arreglado pero me quedó la consulta bloqueada ;( ... ¿Podrías iniciar una nueva por favor? - Elsa Matilde
Alberto Mora Perea Las que separan ruta del nombre serían estas 2 sin necesidad del bucle For: libro = Dir(milibro) Ruta = Mid(milibro, 1, InStr(1, milibro, libro) - 1)Deja nueva consulta en el tablón si no se comprendió el cambio. La consulta anterior quedó bloqueada. Sdos! - Elsa Matilde