Birden Fazla TextBox İle ListBoxta Arama

Bu dosya, bir UserForm üzerindeki üç TextBox ile ListBox'un üç sütununda ayrı ayrı arama yapmayı gösterir. Kutulara yazılan metinle başlayan kayıtlar yazıldıkça ListBox'ta anında listelenir.

Dosyanın içeriği​

• Sayfa1: A1:D42 aralığında veri tablosu bulunur. A sütununda sıra numarası, C sütununda soyad değerleri yer alır; B ve D sütunları da aramaya konu olan veri sütunlarıdır. Sayfada UserForm'u açan bir CommandButton bulunur.
• UserForm1: Üç TextBox (TextBox1, TextBox2, TextBox3) ve üç sütunlu bir ListBox (ListBox1) içerir.

Makrolar​

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme ya da dışarıya bağlantı gibi işlem yoktur.

• CommandButton1_Click: Sayfa1'deki düğmeye tıklanınca UserForm1'i açar.
• UserForm_Initialize: Form açılırken ListBox1'e Sayfa1'in B2:D son satır aralığını RowSource olarak bağlar, sütun sayısını 3 yapar, sütun genişliklerini 90;90;90 olarak ayarlar ve imleci TextBox1'e getirir.
• TextBox1_Change: B sütununda arama yapar. Büyük/küçük harf ayrımı gözetilmez; yazılan metinle başlayan kayıtlar için B, C ve D değerleri ListBox1'e eklenir.
• TextBox2_Change: Aynı işlemi C sütunu için yapar; eşleşen satırın B, C ve D değerlerini listeler.
• TextBox3_Change: Aynı işlemi D sütunu için yapar; eşleşen satırın B, C ve D değerlerini listeler.

Her Change olayı önce ListBox'u temizler, ardından yalnızca ilgili kutudaki ifadeye göre yeniden doldurur. Kutular birbirinden bağımsız çalışır, aynı anda birleştirilmiş filtre uygulanmaz.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sayfa1'deki düğmeye tıklayarak formu açın; tüm kayıtlar ListBox'ta görüntülenir.
3. Aranacak sütuna karşılık gelen TextBox'a metnin baş harflerini yazın; liste yazdıkça daralır.
4. Başka bir sütunda aramak için ilgili TextBox'a yazın; liste o kutudaki ifadeye göre yeniden oluşturulur.
5. Kendi verinizi kullanmak için Sayfa1'deki B, C ve D sütunlarındaki kayıtları değiştirin.