Macro para pasar dato de la hoja a un listbox de formulario

Solo consultas sobre macros y código VBA Excel.
Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Responder
federtuc
Miembro Frecuente
Miembro Frecuente
Mensajes: 31
Registrado: 11 Ene 2016 17:49

Macro para pasar dato de la hoja a un listbox de formulario

Mensaje por federtuc » 12 Jul 2019 20:26

Tengo una hoja con la columna A como cabecera ALUMNOS, Columna B como cabecera EDAD.

ALUMNOS EDAD

Pedro 18
Luis 26
Raul 30
Pablo 23



Lo que necesito es pasar todos los valores a un Listbox que tengo en un formulario de userform, pero solamente los que sean mayor a 25 de edad.

Alguien me puede ayudar?



Avatar de Usuario
Cacho R
Miembro Frecuente
Miembro Frecuente
Mensajes: 11575
Registrado: 23 Jun 2011 17:15
Ubicación: Buenos Aires
Contactar:

Re: Macro para pasar dato de la hoja a un listbox de formulario

Mensaje por Cacho R » 13 Jul 2019 00:29

Hola! federtuc. Por ejemplo así:
.
Ejemplo 19-122.xlsm
¿Te sirve esto?...
Saludos, Cacho R.
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.



federtuc
Miembro Frecuente
Miembro Frecuente
Mensajes: 31
Registrado: 11 Ene 2016 17:49

Re: Macro para pasar dato de la hoja a un listbox de formulario

Mensaje por federtuc » 13 Jul 2019 11:37

excelente, lo que necesitaba. Muchas gracias Cacho!



Avatar de Usuario
Cacho R
Miembro Frecuente
Miembro Frecuente
Mensajes: 11575
Registrado: 23 Jun 2011 17:15
Ubicación: Buenos Aires
Contactar:

Re: Macro para pasar dato de la hoja a un listbox de formulario

Mensaje por Cacho R » 13 Jul 2019 15:55

¡Hoyo en uno!...
Gracias por tu devolución y hasta la próxima.
Cacho R.



federtuc
Miembro Frecuente
Miembro Frecuente
Mensajes: 31
Registrado: 11 Ene 2016 17:49

Re: Macro para pasar dato de la hoja a un listbox de formulario

Mensaje por federtuc » 13 Jul 2019 17:35

Ahora me surge un inconveniente, los datos se cargan en el listbox de esta manera:

ultimaFila = Hoja2.Cells(Rows.Count, 1).End(xlUp).Row
For I = 2 To ultimaFila
UserForm1.ListBox1.AddItem
UserForm1.ListBox1.List(UserForm1.ListBox1.ListCount - 1, 0) = Hoja2.Cells(I, "A")
UserForm1.ListBox1.List(UserForm1.ListBox1.ListCount - 1, 1) = Hoja2.Cells(I, "B")



Next


Con lo cual no me funciona el código que pasó Cacho, deberia modificar algo?



Avatar de Usuario
Cacho R
Miembro Frecuente
Miembro Frecuente
Mensajes: 11575
Registrado: 23 Jun 2011 17:15
Ubicación: Buenos Aires
Contactar:

Re: Macro para pasar dato de la hoja a un listbox de formulario

Mensaje por Cacho R » 14 Jul 2019 01:49

federtuc escribió:
13 Jul 2019 17:35
¿ deberia modificar algo?...
¿No te diste cuenta que -también- te enseñé/mostré como se cargan los datos con extrema eficiencia?...

¡No te compliques!



federtuc
Miembro Frecuente
Miembro Frecuente
Mensajes: 31
Registrado: 11 Ene 2016 17:49

Re: Macro para pasar dato de la hoja a un listbox de formulario

Mensaje por federtuc » 14 Jul 2019 17:44

Si ya pude, muchas gracias!!!



Avatar de Usuario
Cacho R
Miembro Frecuente
Miembro Frecuente
Mensajes: 11575
Registrado: 23 Jun 2011 17:15
Ubicación: Buenos Aires
Contactar:

Re: Macro para pasar dato de la hoja a un listbox de formulario

Mensaje por Cacho R » 14 Jul 2019 19:42

federtuc escribió:
14 Jul 2019 17:44
Si ya pude, muchas gracias!!!
¡Genial!...



Responder