CheckBox'da işaretli olan Hücre Değerini Text Box'a aktarma

[cocoa35]

Arkadaşlar;Önemli bir sorunum var yardım ederseniz çok sevinirim Ekli dosyada görüldüğü üzere User Form çağrıldığında üstündeki checkBox kutusunda işaretli olan Sayfa 1 'de B1 veya B2 hücrelerindeki değerleri Aktar butonu ile UserForm'daki TextBox2 veya TextBox3 'e yazsın ve Hesapla butonu ile toplam bölümüne Text Boxların toplamını alsın bu makro konusunda yardımcı olursanız sevinicem ,iyi çalışmalar dilerim..

 

[udentr2002]

dosyayı eklemeyi unutmuşşsun sanırım

 

[cocoa35]

haklısınız şimdi ekledim

 

[udentr2002]

ekli dosyyaı inceleyiniz inşallah dediğiniz gibi olmuştur

 

[cocoa35]

ilginiz ve çalışmanız için çok teşekkür ederim istediğim olmuş ancak ufak bir sorun var oda şu CheckBox'da işaretli olan hücrenin değerini textBox'a alıyor ama hesapla butonuna bastığımda bütün hücrelerin değerini topluyor textbox2'de değer yazmasa bile...

 

[Orion1]

ilginiz ve çalışmanız için çok teşekkür ederim istediğim olmuş ancak ufak bir sorun var oda şu CheckBox'da işaretli olan hücrenin değerini textBox'a alıyor ama hesapla butonuna bastığımda bütün hücrelerin değerini topluyor textbox2'de değer yazmasa bile...

Ekli dosyayı inceleyiniz.

Private Sub CommandButton1_Click()
Dim toplam As Double
TextBox3.Value = Empty
If IsNumeric(TextBox1.Value) Then
    toplam = toplam + CDbl(TextBox1.Value)
End If
If IsNumeric(TextBox2.Value) Then
    toplam = toplam + CDbl(TextBox2.Value)
End If
TextBox3.Value = Format(toplam, "#,##0.00")
End Sub

 

[cocoa35]

Evet tam istediğim gibi olmuş ilgi ve alakalarınız için çok teşekkür ediyorum..

 

[Orion1]

Bir eksiklik vardı dosyayı güncelledim.
6 nolu mesajdan indirebilirsiniz.