Soru Textboxlarda kontrol

sirkülasyon

Altın Üye
Katılım
10 Temmuz 2012
Mesajlar
2,518
Excel Vers. ve Dili
2021 LTSC TR
Altın Üyelik Bitiş Tarihi
18-06-2026
Kod:
   If (TextBox10.Value) = Empty Then
    MsgBox "" & Label10 & " Girecek Misiniz?", vbYesNo
    If vbYes Then
    TextBox10.SetFocus
    Cancel = True
   ElseIf Not IsEmpty(TextBox10.Value) Then
    TextBox10 = "0,00"
    TextBox11.SetFocus
End If
Eğer Textbox10 boş ise
1 - Uyarı ile veri girişi yapılıp yapılmayacağını EVET ya da HAYIR şeklinde kullanıcıya hatırlatmak
a) Cevap EVET ise Textbox10' a veri girişi yapılmadan çıkılmasını engellemek
b) Cevap HAYIR ise Textbox10' a ondalık kuruş "0,00" şeklinde veri girişi yapılarak Textbox11' e geçiş yapmak

Eğer Textbox11 boş ise
1 - Uyarı ile veri girişi yapılıp yapılmayacağını EVET ya da HAYIR şeklinde kullanıcıya hatırlatmak
a) Cevap EVET ise Textbox11' e veri girişi yapılmadan çıkılmasını engellemek
b) Cevap HAYIR ise Textbox11' e ondalık kuruş "0,00" şeklinde veri girişi yapılarak Textbox12' e geçiş yapmak

Eğer Textbox12 boş ise
1 - Uyarı ile veri girişi yapılıp yapılmayacağını EVET ya da HAYIR şeklinde kullanıcıya hatırlatmak
a) Cevap EVET ise Textbox12' ye veri girişi yapılmadan çıkılmasını engellemek
b) Cevap HAYIR ise Textbox12' ye ondalık kuruş "0,00" şeklinde veri girişi yapmak
Rica etsem yardım edebilir misiniz?
 
Üst