listbox da veri listeleme

Katılım
24 Haziran 2006
Mesajlar
6
Lütfen yardım
TextBox1 deki veriyi data1 sayfamın p2:p3000 arasında arayarak bulduğu değerleri ListBox1 de sıralasın istiyorum.Nasıl yapabilirim...
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Aşağıdaki kodu bir commandbuttona yazarak deneyin. P sütununda aranan veri bulununca hangi sütundaki karşılığının listboxa yükleneneceğini belirtmemişsiniz. Ben "q" sütunu kabul ettim.

[vb:1:afb51ae317]for a=2 to 3000
if sheets("data1").cells(a,"p")=textbox1 then listbox1.additem sheets("data1").cells(a,"q")
next[/vb:1:afb51ae317]
 
Üst