Excel - listbox

   
Vista:

listbox

Publicado por edu (63 intervenciones) el 31/01/2009 14:42:45
Hola a todos haber si alguien podria ayudarme:
Mi duda es la siguiente, tengo un listbox en una hoja excel y quiero ir añadiendo nombres.
A B C
1 JOSE 122
2
3 ANTONIO 34
4
5 JUAN 0

el programa que e echo es este:

Dim nombre As Variant

Private Sub ListBox1_Click()
fila= 1
Do
If Cells(fila, 2) > 0 Then
nombre = Cells(fila, 1).Value
ListBox1.Add = nombre (esta funcion no funciona)
ListBox1.List() = nombre (esta tampoco funciona)
End If
fila = fila + 1
Loop Until fila = 1000
End Sub

Alguien me podria decir como se hace para ir añadiendo cosas a un listbox y tambien decirme como se hace para leer la columna fila a fila hasta la ultima que haya escrita, yo en mi caso como nose como se hace pues e puesto un bucle Do Loop Until hasta la linea 1000.

Gracias a todos!!!!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:listbox

Publicado por Freddy (38 intervenciones) el 03/02/2009 03:44:51
Debes usar ListBox1.List(), y darle el rango de ubicación en donde pondras tu lista de datos, esta lista debe estar ubicada en una parte oculta dentro de la hoja de calculo.
Servido.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar