Listbox ta veri süzme

[airborne]

s.a.

Personel bilgileri formunda personel aramak için Er karakterlerini girdiğimde listbox ta süzme işlemini yapılıyor ama ilgili personelin üzerine listbox ta tıkladığımda ilgili personelin verileri birebir gelmiyor.

Yardımlarınız için teşekkür ederim.

Dosya indirme linki :
Açılır Kapanır Menü12.rar - 40 KB

 

[airborne]

s.a.

Bu konunun çözümü yok galiba.

selametle……….

 

[YUSUF44]

Farklı bir kod yapısı kullanmışsınız. Anladığım kadarıyla listboxta süzme yapıldığında seçilen kişinin bilgilerini for next döngüsüyle forma çekmeye çalışıyorsunuz. Asıl listeniz 22 satırdan oluşurken listboxta süzme yapıldığında satır sayısı azalıyor, örneğin 3 oluyor. For next döngüsünde bilgileri seçilen kişinin listboxtaki yerine göre belirliyorsunuz. Asıl listede Derviş kişisi 9. sıradayken filtre yapıldığında 1. kişi oluyor ve siz Derviş'i seçtiğinizde Derviş'in o anki listindex değeri 0 olduğundan listeden 1. kişinin bilgileri formda görüntüleniyor.

Bunu düzeltmek için sira değişkenini listindexe göre değil sayfadaki satıra göre bulmalısınız.

sira = WorksheetFunction.Match(ListBox1, [A:A], 0)

gibi.

 

[airborne]

s.a.

Allah razı olsun üstad.

Selametle................................