Hücre-Label-Textbox

Katılım
9 Mart 2005
Mesajlar
5
:hey: Sayın Hocam Combobox'tan seçmiş olduğum malzemenin tutarını çalışma sayfasındaki A1 hücresine gönderiyorum B1 hücreside A1'deki malzemeye göre DÜÞEYARA ile fiyatını buluyor.
Þimdi bu fiyatı Label1'e alırken kuruşuna kadar doğru gösteriyor ama aynı formdaki labellerin toplamını başka bir label nesnesinde gösterirken kuruşlar gitmiş yerine 00 yazıyor kuruşu hiç almıyor. Kullanmış olduğum kodlar aşağıda :?

txtbox1.Text = Format(txtbox1.Text, "#,##0.00")
label1.Caption = Format(label1.Caption, "#,##0.00")

txtbox1.Text = Format(txtbox1.Text, "0.00")
label1.Caption = Format(label1.Caption, "0.00")

labeltop.Caption = Val(label1.Caption) + Val(label2.Caption) + Val(label3.Caption)

textboxtop.Text = Val(label1.Caption) + Val(label2.Caption) + Val(label3.Caption)

Sizden isteğim Label'den Textbox'a veya Textbox'tan Labele veya herikisindende hücreye para transferlerinde kuruşu aynen gösterecek kodlara ihtiyacım var. Göndermeniz mümkünmü.
Hocam sitenize bir hazır maaş proğramı gönderdim dikkate alırsanız sevinirim Hayırlı Çalışmalar dileğiyle
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Aşağıdaki şekilde deneyin.

[vb:1:6ca172d855]labeltop.Caption = label1.value*1 + label2.value*1 + label3.value*1

textboxtop.Text = label1.value*1 + label2.value*1 + label3.value*1
[/vb:1:6ca172d855]
 
Katılım
9 Mart 2005
Mesajlar
5
textboxtop.Text = Val(label1.Caption) + Val(label2.Caption) + Val(label3.Caption)

Hocam dediğiniz şekilde de oluyor, bir Val ibaresini kaldırınca da oluyor.
 
Üst