Bu dosya, telefon ve e-posta kayıtlarını bir UserForm üzerinden yönetmek için hazırlanmış makrolu bir telefon rehberidir. Kayıtlar telefon_rehberi sayfasında tutulur; form üzerinden arama yapılır, kişi eklenir, güncellenir ve silinir.
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
- telefon_rehberi: Kayıtların tutulduğu sayfadır. Sütun başlıkları Adı, Telefon 1 ve Email alanlarını içerir; A2:E2 aralığında örnek bir kayıt (Ali) bulunur. Sayfada formül yoktur.
- tel_rehberi: Rehber formudur. Ad yazılan bir ComboBox, sonuçların listelendiği 5 sütunlu bir ListBox, 5 adet TextBox ve 4 adet CommandButton içerir.
- Module1: Formu açan formac makrosunu içerir.
Makrolar
- formac: tel_rehberi formunu açar. Rehberi kullanmaya bu makro çalıştırılarak başlanır.
- ComboBox1_Change: ComboBox'a yazılan harflerle A sütunundaki adları karşılaştırır. Büyük/küçük harf ve i/I farkı gözetmeden, yazılanla başlayan kayıtları ListBox'ta A-E sütunlarıyla listeler.
- ListBox1_Click: Listeden seçilen kaydın satırını bulur ve bilgilerini 5 TextBox'a aktarır.
- Ekle düğmesi: Önce ad girilmiş olmasını denetler. Kaydı son satırın altına yazar, A2:E5000 aralığını ada göre A'dan Z'ye sıralar, sayfayı korumaya alır ve dosyayı kaydeder.
- Güncelle düğmesi: Listeden kayıt seçilmesi gerekir. TextBox'lardaki değerleri seçili satıra yazar ve dosyayı kaydeder.
- Sil düğmesi: Listeden seçilen kaydın satırını siler ve dosyayı kaydeder.
- Temizle düğmesi: Formu ve TextBox renklerini başlangıç durumuna döndürür.
- TextBox olayları: Bir kutuya yazı girilirken kutu yeşil, kutudan çıkıldığında beyaz renk alır.
Nasıl kullanılır
- Dosyayı açıp makroları etkinleştirin.
- formac makrosunu çalıştırarak (Alt+F8) rehber formunu açın.
- Kişi aramak için ComboBox'a adın ilk harflerini yazın; eşleşen kayıtlar listelenir.
- Yeni kişi için ad, telefon ve e-posta bilgilerini TextBox'lara girip Ekle düğmesine basın.
- Mevcut kaydı değiştirmek için listeden seçin, bilgileri düzeltin ve Güncelle düğmesine basın.
- Kaydı kaldırmak için listeden seçip Sil düğmesine basın.