[Yardım]  Textbox ile listboxta arama

Metin Kutucuğu. Bir programcının olmazsa olmazlarındandır.

Textbox ile listboxta arama

İleti#1)  zfr10 » 11 Mar 2018 02:39

Selamün aleyküm arkadaşlar. Aşağıda siteden bulmuş olduğum kodlar J sütununa kadar filtreleme yapıyor ve ilave edilince de hata veriyor. İstenilen sütun kadar arama nasıl olabilir? Bu hususta yardım edebilir misiniz?

Private Sub TextBox1_Change()

ListBox1.RowSource = ""
ListBox1.Clear
For i = 1 To Range("a65536").End(3).Row
If Sayfa2.Range("A" & i) Like TextBox1.Value & "*" Then
ListBox1.AddItem
ListBox1.List(ListBox1.ListCount - 1, 0) = Sayfa2.Range("A" & i)
ListBox1.List(ListBox1.ListCount - 1, 1) = Sayfa2.Range("B" & i)
ListBox1.List(ListBox1.ListCount - 1, 2) = Sayfa2.Range("C" & i)
ListBox1.List(ListBox1.ListCount - 1, 3) = Sayfa2.Range("D" & i)
ListBox1.List(ListBox1.ListCount - 1, 4) = Sayfa2.Range("E" & i)
ListBox1.List(ListBox1.ListCount - 1, 5) = Sayfa2.Range("F" & i)
ListBox1.List(ListBox1.ListCount - 1, 6) = Sayfa2.Range("G" & i)
ListBox1.List(ListBox1.ListCount - 1, 7) = Sayfa2.Range("H" & i)
ListBox1.List(ListBox1.ListCount - 1, 8) = Sayfa2.Range("I" & i)
ListBox1.List(ListBox1.ListCount - 1, 9) = Sayfa2.Range("J" & i)
End If
Next i
End Sub
Kullanıcı avatarı
zfr10
Siteye Alışmış
 
Adı Soyadı:zafer konuk
Kayıt: 14 Şub 2010 03:53
Konum: bursa
Meslek: orman muhafaza memuru
Yaş: 33
İleti: 138
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: bursa/m.k.paşa

Cevap: Textbox ile listboxta arama

İleti#2)  Orion1 » 11 Mar 2018 14:32

Merhaba.
Listboxa veriyi add item yöntemi ile alırsanız max 10 sütun alabilirsiniz.
Rowsource yöntemi ile almayı deneyin.:cool:
Kullanıcı avatarı
Orion1
Siteye Alışmış
 
Adı Soyadı:Evren Gizlen
Kayıt: 18 Tem 2008 22:51
Meslek: inşaat teknikeri
İleti: 386
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: Türkiye

Cevap: Textbox ile listboxta arama

İleti#3)  zfr10 » 21 Mar 2018 15:19

Evren Bey bu konuda yardım edebilir misiniz? Epey uğraştım ama olmadı.
Kullanıcı avatarı
zfr10
Siteye Alışmış
 
Adı Soyadı:zafer konuk
Kayıt: 14 Şub 2010 03:53
Konum: bursa
Meslek: orman muhafaza memuru
Yaş: 33
İleti: 138
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: bursa/m.k.paşa


Forum TextBox

Online Kullanıcılar

Bu forumu görüntüleyenler: Kayıtlı kullanıcı yok ve 2 misafir

Bumerang - Yazarkafe