Bu dosya, bir UserForm üzerindeki TextBox alanlarının kayıt işleminden önce dolu olup olmadığını kontrol eden makrolu bir örnektir. Boş bir alan bulunduğunda ilgili alan için uyarı verilir ve imleç o alana taşınır.
Dosyanın içeriği
- exceldestek.com | exceldepo.com sayfası: A2:D14 aralığında içerik bulunan çalışma sayfasıdır; sayfada formül yoktur.
- UserForm1: Üç TextBox ile bir CommandButton içeren kullanıcı formudur. TextBox1 ad, TextBox2 soyad, TextBox3 meslek bilgisi için kullanılır.
- Module1: Formu açan formac makrosunu içerir.
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Kodda dosya silme veya dışarıya bağlantı gibi zararlı bir işlem yoktur.- formac: UserForm1 formunu ekrana getirir.
- UserForm_Initialize: Form açılırken her TextBox için uyarı metnini Tag özelliğine yazar: "Ad Giriniz", "Soyad Giriniz" ve "Mesleğini Giriniz".
- CommandButton1_Click: Butona basıldığında formdaki tüm kontrolleri tarar, yalnızca TextBox türündekileri denetler. Değeri boş olan ilk TextBox için Tag içindeki uyarıyı MsgBox ile gösterir, imleci o kutuya taşır ve işlemi durdurur. Boş alan kalmamışsa "Boş textbox kalmamıştır" başlıklı bilgi mesajı görüntülenir.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- Alt+F8 ile formac makrosunu çalıştırın; form açılır.
- Alanlardan bazılarını boş bırakıp butona basın; boş alan için uyarı çıkar ve imleç o alana gider.
- Tüm alanları doldurup tekrar butona basın; bilgilendirme mesajı görüntülenir.
- Kontrol edilecek alan sayısını artırmak için forma yeni TextBox eklenir ve UserForm_Initialize içinde Tag değeri tanımlanır.