+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Excel (https://accesstr.net/forum-microsoft-excel.html)
+--- Forum: Excel Cevaplanmış Soruları (https://accesstr.net/forum-excel-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Textboxda Toplam Karşılaştırma (/konu-textboxda-toplam-karsilastirma.html)
Textboxda Toplam Karşılaştırma - malatyalı - 05/07/2021
Ustam Hayırlı Akşamlar
Müsaadeniz ile bir sorum olacak.
a) Textbox4, Textbox8 ve Textbox12 ye girilen rakamların toplamı Textbox2' deki rakamları geçiyorsa
Textbox4, Textbox8 ve Textbox12' nin içini temizleyerek tekrar giriş yapın diye uyarı verecek
b) Textbox4, Textbox8 ve Textbox12 ye girilen rakamların toplamı Textbox2' deki rakamları geçmiyorsa
kayıt edecek bir koda ihtiyacım var.
Yardımcı olabilir misiniz?
RE: Textboxda Toplam Karşılaştırma - berduş - 05/07/2021
sayın @malatyalı sizce de artık basit if kıyaslama fonksiyonunu yazabiliyor olmanız gerekmez mi?
en basit kodu bile biz yazarsak siz nasıl öğreneceksiniz?
RE: Textboxda Toplam Karşılaştırma - feraz - 06/07/2021
Dim topla As Double
If Me.TextBox4.Value = "" Or Me.TextBox8.Value = "" Or Me.TextBox12.Value = "" Then
MsgBox "Gerekli textboxlar bos olamaz"
Exit Sub
End If
topla = Me.TextBox4.Value + 0 + Me.TextBox8.Value + 0 + Me.TextBox12.Value + 0
If topla > Me.TextBox2.Value Then
MsgBox "tekrar giris yapin"
Me.TextBox4.Value = Empty
Me.TextBox8.Value = Empty
Me.TextBox12.Value = Empty
Exit Sub
End If
'Kayit kodlari alta devam edilecekRE: Textboxda Toplam Karşılaştırma - malatyalı - 06/07/2021
Berduş Ustam vallahi yapamadım. İkinci bir sorum daha vardı onu sormaya imtina ettim araştırarak bir örnek buldum ve kendime uyarladım. Ama bu konuda bir gram olan aklım iyice karıştı. Hakkınızı helal edin.
Feraz ustama da teşekkür ederim