Bu dosya, Sayfa1'deki isim ve tarih kayıtlarını bir UserForm üzerinden tarih kriterine göre ListBox'ta listeler. Kriter ComboBox'tan seçilir, tarih TextBox'a yazılır ve eşleşen kayıtlar iki sütun halinde (ad ve tarih) gösterilir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sayfa1: A sütununda ad listesi (Bahadır, Ömer, Feyzullah, Erman, Ali, Tuğkan), B sütununda her kişiye ait tarih bulunur. Veriler A1:F14 aralığındadır.
- UserForm1: ComboBox1 (kriter seçimi), TextBox1 ve TextBox2 (tarih girişi), Label1, CommandButton1 (listeleme düğmesi) ve sonuçların gösterildiği ListBox1 yer alır.
- Module1: Formu açan kısa makro bulunur.
Makrolar
- Resim2_Tıkla: UserForm1'i açar. Sayfadaki resme veya şekle atanarak çalıştırılır.
- UserForm_Initialize: ComboBox1'e Eşit, Eşit Değil, Büyük, Büyük Eşit, Küçük, Küçük Eşit ve Arasında seçeneklerini yükler. Tarih kutuları ve etiket başlangıçta gizlidir.
- ComboBox1_Change: Kriter değişince ListBox'ı temizler. "Arasında" seçilirse iki tarih kutusu, diğer kriterlerde yalnızca ilk kutu görünür.
- TextBox1_Change ve TextBox2_Change: Gün ve ay sonrasına otomatik nokta ekler (gg.aa.yyyy). Tarih 10 karaktere ulaşınca odak sonraki kutuya veya düğmeye geçer.
- TextBox1_Exit ve TextBox2_Exit: Girilen metni tarihe çevirir; geçersizse "Lütfen geçerli bir tarih giriniz." uyarısı verir ve kutuyu boşaltır.
- CommandButton1_Click: Sayfa1'de 2. satırdan A sütunundaki son dolu satıra kadar B sütunundaki tarihleri seçilen kritere göre karşılaştırır. Uyan kayıtların adı ve tarihi ListBox1'e eklenir.
Nasıl kullanılır
- Dosyayı açıp makroları etkinleştirin.
- Formu açan resme veya şekle tıklayın.
- Kriter listesinden bir seçenek belirleyin.
- Tarihi gg.aa.yyyy biçiminde yazın; "Arasında" için ikinci tarihi de girin.
- Listele düğmesine tıklayın; eşleşen kayıtlar ListBox'ta görünür.