İki textbox toplamının anlık olarak diğer textbox a yansıması

Katılım
27 Mart 2020
Mesajlar
12
Excel Vers. ve Dili
Excel 2013 Türkçe
Selamlar başlıkta açıkladığım üzere iki textbox toplamını 3. textbox a aktarmak istiyorum her hangi bir button olmadan anlık olarak

Private Sub CommandButton1_Click()

If TextBox3 = "" Then
TextBox3.Value = Format(CDbl(TextBox1.Value) * CDbl(TextBox2.Value), "0.00")
End If
End Sub


Private Sub TextBox6_Change()

TextBox6.Value = Format(CDbl(TextBox5.Value) + CDbl(TextBox4.Value), "0.00")

End Sub
 

ÖmerBey

Destek Ekibi
Destek Ekibi
Katılım
22 Ekim 2012
Mesajlar
4,405
Excel Vers. ve Dili
2007 Türkçe
Merhaba,
Kodlarınızı veri girilen textboxların tetikleyicisiyle çalışacak şekilde düzenleyip deneyiniz...
Kod:
Private Sub TextBox4_Change()
TextBox6.Value = Format(CDbl(TextBox5.Value) + CDbl(TextBox4.Value), "0.00")
End Sub

Private Sub TextBox5_Change()
TextBox6.Value = Format(CDbl(TextBox5.Value) + CDbl(TextBox4.Value), "0.00")
End Sub
 
Katılım
27 Mart 2020
Mesajlar
12
Excel Vers. ve Dili
Excel 2013 Türkçe
Merhaba,
Kodlarınızı veri girilen textboxların tetikleyicisiyle çalışacak şekilde düzenleyip deneyiniz...
Kod:
Private Sub TextBox4_Change()
TextBox6.Value = Format(CDbl(TextBox5.Value) + CDbl(TextBox4.Value), "0.00")
End Sub

Private Sub TextBox5_Change()
TextBox6.Value = Format(CDbl(TextBox5.Value) + CDbl(TextBox4.Value), "0.00")
End Sub
resim burada

hocam cevabınızı anlayamadım; tekrar yazabilir misiniz textbox ları numaralandırdım. Link yukarda
 
Katılım
6 Temmuz 2015
Mesajlar
926
Excel Vers. ve Dili
2003
Neresini anlamadınız ? Textbox4 ve 5'in change olaylarına yazacaksınız.
 
Katılım
6 Temmuz 2015
Mesajlar
926
Excel Vers. ve Dili
2003
Sizin de karşınızda çocuk yok.
Yazdığım kelimede kötü ne gördünüz ?
 
Üst