Mostrar en listbox solo las filas con dato, a partir de la columna 1 de la tabla.
Tengo una tabla con datos, la primera columna (A) es un ID, cuando se completa información en mi base de datos, el número del ID lo elimino, quedando vacío. Entonces cuando vuelvo a cargar el listbox, no quiero que las filas con ID vacío se muestren el el listbox.
El siguiente es el código que utilizo para cargar el listbox. La primera fila con dato ID es la 3.
Option Explicit
Sub cargarlista()
Dim i As Long
i = 2
Do While Hoja1.Cells(i + 1, 1).Value <>""
With ListContratosHH.ListBox1
.AddItem Hoja1.Cells(i + 1, 1).Value
.List(i - 2, 1) = Hoja1.Cells(i + 1, 4).Value
.List(i - 2, 2) = Hoja1.Cells(i + 1, 5).Value
.List(i - 2, 3) = Hoja1.Cells(i + 1, 11).Value
End With
i = i + 1
Loop
End Sub
4 Respuestas
Respuesta de david ..
1
Respuesta de Rafael Vera
1
Respuesta de Rodolfo Arce
1
Respuesta de Dante Amor