TextBox'a Yazdığın ListBox'ta Seçilsin

Bu dosya, bir UserForm üzerindeki TextBox'a yazılan harflerin ListBox'taki kayıtlarla eşleştirilmesini ve eşleşen ilk kaydın otomatik seçilmesini gösteren makro destekli bir örnektir. Arama kutusu ve liste kutusu içeren form tasarımlarında temel olarak kullanılabilir.

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

Dosyanın içeriği​

• İşlem Sayfası: Formu açan resim düğmesinin bulunduğu başlangıç sayfasıdır.
• Veriler: A1:A41 aralığında ListBox'a kaynak olan liste yer alır. Bu aralık ListRange adıyla tanımlıdır.
• Module1: Gizli sayfa olarak görünen modüldür; formu açan makroyu barındırır.

Dosyada sayfa formülü bulunmaz; işlem tamamen makrolarla yürütülür.

Makrolar​

• Resim2_Tıkla (Module1): UserForm1 formunu açar. İşlem Sayfası'ndaki resme tıklandığında çalışması için makronun resme atanmış olması gerekir.
• TextBox1_Change (UserForm1): TextBox içeriği her değiştiğinde çalışır. Önce ListBox'taki seçimi kaldırır. TextBox boşsa işlem yapmadan çıkar. Doluysa ListBox kayıtlarını baştan sona büyük/küçük harf ayrımı yapmadan tarar ve yazılan metinle başlayan ilk kaydı seçer.
• CommandButton1_Click (UserForm1): Formu kapatır.

Makrolarda dosya silme veya dışarıya bağlantı gibi işlem yoktur.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. İşlem Sayfası'ndaki resme tıklayarak formu açın.
3. TextBox'a aranan kaydın ilk harflerini yazın; eşleşen ilk kayıt ListBox'ta seçilir.
4. Eşleşme yoksa ListBox'ta seçim yapılmaz. TextBox temizlendiğinde de seçim kalkar.
5. Formu kapatmak için kapat düğmesini kullanın.
6. Kendi listenizi kullanmak için Veriler sayfasındaki A sütununu değiştirin; kayıt sayısı 41'den farklıysa ListRange adını yeni aralığa göre güncelleyin.