TextBox ile Çoklu Filtreleme

Bu dosya, bir UserForm üzerindeki ListBox'ta listelenen verileri üç ayrı TextBox ile filtreleyen bir örnektir. Her TextBox ListBox'taki üç sütundan birine karşılık gelir; kutuya yazılan harfler arttıkça liste anında daralır.

Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sayfa1: A1:D42 aralığında veri listesi bulunur. A sütununda Sıra numarası, C sütununda Soyad bilgisi yer alır. Formu açan CommandButton1 düğmesi de bu sayfadadır.
• UserForm1: Üç TextBox ve üç sütunlu bir ListBox içeren filtreleme formudur.

Makrolar​

• CommandButton1_Click (Sayfa1): Düğmeye basıldığında UserForm1 formunu açar.
• UserForm_Initialize: Form açılırken ListBox1 listesini Sayfa1 sayfasındaki B2:D son dolu satır aralığıyla doldurur, sütun sayısını 3 yapar, her sütun genişliğini 90 olarak ayarlar ve imleci TextBox1 kutusuna getirir.
• TextBox1_Change: B sütunundaki değerleri TextBox1 içeriğiyle karşılaştırır. Değeri yazılan metinle başlayan satırlar ListBox'a B, C ve D sütunlarıyla birlikte eklenir.
• TextBox2_Change: Aynı işlemi C sütunu ve TextBox2 için yapar.
• TextBox3_Change: Aynı işlemi D sütunu ve TextBox3 için yapar.

Karşılaştırma büyük/küçük harf ayrımı yapmaz ve yazılan metinle başlayan kayıtları listeler. Her TextBox listeyi kendi sütununa göre baştan oluşturur; üç kutunun koşulları birlikte uygulanmaz, son değiştirilen kutu listeyi belirler. Kodda dosya silme ya da dış bağlantı işlemi yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Sayfa1 üzerindeki düğmeye tıklayarak UserForm1 formunu açın.
3. İlk üç sütunun listelendiği ListBox'ta tüm kayıtlar görünür.
4. Aranacak değerin ilk harflerini ilgili sütunun TextBox kutusuna yazın; liste yazdıkça daralır.
5. Kendi verinizi kullanmak için Sayfa1 sayfasındaki B2:D aralığını değiştirin; form açılırken liste son dolu satıra göre yeniden oluşturulur.