Buenas,

Tengo este código

If (.BOF And .EOF) Then
MsgBox "No se han encontrado los datos buscados"
Else
' Mostrar los datos hallados
ListView1.ListItems.Clear
.MoveFirst
Do While Not .EOF
Set tLi = ListView1.ListItems.Add(, , .Fields("Referencia") & "")
tLi.SubItems(1) = .Fields("Familia") & ""
tLi.SubItems(2) = .Fields("Descripcion") & ""


.MoveNext
Loop
End If

y cuando lo ejecuto resulta que me da el error 380 - El valor de la propiedad no es válido

En el listview sólo me saleel valor del del campo Referencia del primer registro encontrado y sedetiene el programa mostrando el error.

Por qué me pasa eso??

Una ayudita porfa....

Gracias.

infrared

Creo que el error proviene de cómo hayas declarado "tLi"

Saludos

ok
lo encontré.
muchas gracias.