.Find kodu ve listvies öğesi için yardım.

[felix83]

Set bul1 = Range("c1:c" & Cells(300, 3).End(xlUp).Row).Find(ListView1.SelectedItem.ListSubItems(1), Lookat:=xlWhole)

şeklindeki satırda ben subitems(1) yani 2.sütun yerine birinci sütunu aratmak istiyorum subitems(0) yazdım olmadı bunu nasıl yapabilirim?

 

[Korhan Ayhan]

Selamlar,

Aşağıdaki şekilde denermisiniz.

Set bul1 = Range("c1:c" & Cells(300, 3).End(xlUp).Row).Find(ListView1.SelectedItem, Lookat:=xlWhole)