Hola amigos.
Tengo un listview con las columnas
legajo nombre apellido antiguedad
1 marcelo cardozo
2 dario diaz
3 ivan bazan
etc...
Todas las columnas como veran estan completas menos la de antiguedad la cual necesito completar una ves que este la lista llena, lo que intente es lo siguiente:
Recorro todos los item del listview intentando completar esta ultima columna.
Dim i As Long
Dim item As ListItem
For i = 1 To Me.ListView1.ListItems.Count
Set item = Me.ListView1.ListItems.item(i).ListSubItems.Add(3, , "lo que sea")
Next i
Esto me larga error "El indice esta fuera de los limites" y no encuentro solucion, desde ya muchas gracias de antemano por su tiempo y por su ayuda.
Buenas amigos, mas o menos encontre la solucion la cual me trae un efecto no deseado, veamos si pueden ayudarme.
resulta que cuando inserto los datos en la columna por ejemplo cuatro con el siguiente codigo:
Dim i As Long
Dim item As ListItem
For i = 1 To Me.ListView1.ListItems.Count
Set item = Me.ListView1.ListItems.item(i)
item.ListSubItems.Add 2, , "valor"
Next i
El valor que estaba en la siguiente columna se corre a la siguiente y asi sucesivamente, alguien tiene alguna sugerencia, gracias.