TextBox'taki Verileri Toplama İşlemi

csncesur

Altın Üye
Katılım
12 Ekim 2021
Mesajlar
91
Excel Vers. ve Dili
Türkçe
Altın Üyelik Bitiş Tarihi
21-02-2025
Ek'te gönderdiğim UserForm isimli Excel çalışmamda DataInput isimli butona tıkladığımda Userform1 açılıyor. Açılan pencerede Texbox1, Texbox2, Texbox3, Texbox4, Texbox5, e veri girdiğimde Label1 e toplamasını istiyorum. Her TextBox'a veri girdiğimde toplama işlemini anlık göstermesini istiyorum. Dosyada detaylı açıklamalar mevcuttur. Yardımlarınıza ihtiyacım vardır. Şimdiden teşekkür ederim.
 

Ekli dosyalar

csncesur

Altın Üye
Katılım
12 Ekim 2021
Mesajlar
91
Excel Vers. ve Dili
Türkçe
Altın Üyelik Bitiş Tarihi
21-02-2025
Ek'te gönderdiğim UserForm isimli Excel çalışmamda DataInput isimli butona tıkladığımda Userform1 açılıyor. Açılan pencerede Texbox1, Texbox2, Texbox3, Texbox4, Texbox5, e veri girdiğimde Label1 e toplamasını istiyorum. Her TextBox'a veri girdiğimde toplama işlemini anlık göstermesini istiyorum. Dosyada detaylı açıklamalar mevcuttur. Yardımlarınıza ihtiyacım vardır. Şimdiden teşekkür ederim.
Tamamdır Hallettim
 

BYSERTTAS

Altın Üye
Katılım
9 Ekim 2012
Mesajlar
136
Excel Vers. ve Dili
Excel Vers. ve Dili Ofis 2021 TR 32 Bit
Altın Üyelik Bitiş Tarihi
06-01-2025
puantaj cetvelini toplamak için kullandığım bir kod var sanırım kendinize göre uyarlayabilirsiniz. bende bu siteden aldım inşallah işinizi görür.
kod:
Sub GünlerToplamı()
Dim My_CheckBox As MSForms.Control, say As Byte

For Each My_CheckBox In Me.Controls
If TypeName(My_CheckBox) = "CheckBox" Then
If My_CheckBox.Value Then
say = say + 1
End If
End If
Next

ToplamGün = say
End Sub
 
Katılım
6 Temmuz 2015
Mesajlar
925
Excel Vers. ve Dili
2003
Teşekkürler, kullanırım.
 
Üst