TextBox'da arama ListBox'da gösterme

[yavuz829]

Merhaba arkadaşlar ekli dosyamda TextBox6'da B sutununda bulunan isimler ile ilgili bir iki harf yazdığım zaman o isimdeki kişileri ListBox'da sıralıyor. Sadece birinci kelimeye duyarlı olarak sıralıyor. B sutununda bulunan cumlede üçüncü veya dördüncü kelimeyi yazdığım zaman ListBox'da göstermiyor. Benim istediğim.

* Örneğin TextBox6'ya Ankara kelimesini yazdığım zaman içinde Ankara kelimesi geçen satırları ListBox'da göstersin.
Forumda bulduğum Örnek2 deki kodları dosyama uyarlamaya çalıştım beceremedim hata veriyor.

 

[Ömer]

Merhaba,

TextBox6_Change kodlarındaki;

Set k = .Range("B2:B65536").Find(TextBox6.Text & "*", , xlValues, xlWhole)

yukarıdaki satırın yerine aşağıdaki satırı yazın. İlaveyi kırmız ile işaretledim.

Set k = .Range("B2:B65536").Find("*" & TextBox6.Text & "*", , xlValues, xlWhole)

.

 

[yavuz829]

Çok teşekkürler hocam ellerinize sağlık.