Selam Arkadaşlar,
If TextBox1 = "" Or TextBox2 = "" Or TextBox3 = "" Or TextBox4 = "" Or TextBox6 = "" Or OptionButton1.Value=False Or OptionButton1.Value=False Then
MsgBox "LÜTFEN VERİ BİLGİLERİNİ GİRİNİZ!", 16, "DİKKAT"
TextBox1.SetFocus
Exit Sub
End If
Yukarıdaki örnek koda göre,
UserForm1 üzerinde bulunan 5 adet OptionButton ların herhangi biririnin seçilmemiş olması durumunda MsgBox "LÜTFEN VERİ BİLGİLERİNİ GİRİNİZ!", 16, "DİKKAT" uyarısının ekrana gelmesini istiyorum.
OptionButton1.Value=False olarak yazıyorum ancak bir türlü yapamadım. yardımcı olursanız sevinirim. Selamlar. :hey:
If TextBox1 = "" Or TextBox2 = "" Or TextBox3 = "" Or TextBox4 = "" Or TextBox6 = "" Or OptionButton1.Value=False Or OptionButton1.Value=False Then
MsgBox "LÜTFEN VERİ BİLGİLERİNİ GİRİNİZ!", 16, "DİKKAT"
TextBox1.SetFocus
Exit Sub
End If
Yukarıdaki örnek koda göre,
UserForm1 üzerinde bulunan 5 adet OptionButton ların herhangi biririnin seçilmemiş olması durumunda MsgBox "LÜTFEN VERİ BİLGİLERİNİ GİRİNİZ!", 16, "DİKKAT" uyarısının ekrana gelmesini istiyorum.
OptionButton1.Value=False olarak yazıyorum ancak bir türlü yapamadım. yardımcı olursanız sevinirim. Selamlar. :hey: