Sayý formatlanýnca niçin çarpma toplama vs. hata veriyor

[sender]

Arkadaþlar mrb. format problemi baþlýðýnda bu soruya deðindim ama galiba anlaþýlmadý yada yeni bir baþlýk açmam gerekiyordu. O yüzden özür diliyorum ve sorumu burada soruyorum.

Sayý formatlanýnca niçin çarpma toplama vs. hata veriyor. Daha dðrusu niye noktadan sonrasýný almýyor.

textbox1 de 100.000
textbox2 200.000

textbox3tede otomatikmen 300.000 olmasý gerekirken 300 var.

hesaplama kodlarým þöyle;
textbox3.value = val(textbox1.value) + val(textbox2.value)
bu kodu her üç textboxsada yazýyorum ki otomatik toplasýn.

ama sonuç 300 niye böyle oluyor.

textboxlarýmýn formatý

textbox...= format( texbox...,"###,0") þeklinde..

yardýmcý olursanýz sevinirim kolay gelsin.

[ALPEN]

TextBox.. = Format(TextBox.., "#,##0")

[sender]

...
larý soruyorsanýz eðer üç tane yazmayayým diye ... koymuþtum yanlýþ anlaþýldýysa özür dilerim :)

textbox1.value= format(textbox1,"###,0")
textbox2.value= format(textbox2,"###,0")
textbox3.value= format(textbox3,"###,0")

[ALPEN]

hayýr yanlýþ anlama yok

format a dikkatedersen biraz deðiþik.
TextBox.. = Format(TextBox.., "#,##0")

[sender]

çok afedersiniz ben yanlýþ gördüþüm.
Böyle yaparsam düzelelirmi.
Þuan deneme imkaný yok sayýn alpen.

yani herhangi bir butona basmadan textbox3 textbox1 ve textbox2 ye girlen deðerleri kendi otomatik toplarmý...

100.000+200.000=300.000
çýkartýrmý..??

çok teþekkür ediyorum..

[ALPEN]

ben denedim çýkýyor : )

[sender]

çok saolun bende hemen deneyeceðim kolay gelsin.

[sender]

allah allah ben cevap yamýþtým ama ne oldu bilmiyorum.

sayýn alpen sonuç tam olarak olmadý.

yani 100 ile 100 çarptýrýmca 1.000 oluyorda
fakat 1.000 ile 5.000
çarptýrýnca

5 oluyor sonuç

yani bu þudemek

texbox1 ve 2 ye 100 katlarý þeklinde sayý girdiðimizde sonuç hatalý oluyor.

[ALPEN]

TextBox1 = Format(TextBox1, "#,##0")
TextBox2 = Format(TextBox2, "#,##0")
TextBox3 = TextBox1 * TextBox2
TextBox3 = Format(TextBox3, "#,##0")

[sender]

sayýn alpen
Evet bende böyle giriyorum ve ilk denemem þuydu

tex1 e 2.500
text2 ye 300.000
text3= oldu 750 ye

[Hüseyin]

Sayýn sender,
konuyu tam takip edemedim ama, bölgesel ayarlarýnýzdan kaynaklanýyor olabilirmi sorununuz?

[ALPEN]

Private Sub CommandButton1_Click()
TextBox3 = TextBox1 * TextBox2
TextBox3.Value = Format(TextBox3, "#,##0")
End Sub

Private Sub TextBox1_Change()
TextBox1.Value = Format(TextBox1, "#,##0")
End Sub

Private Sub TextBox2_Change()
TextBox2.Value = Format(TextBox2, "#,##0")
End Sub

araçlar> seçenekler> uluslararasý(farklý olabilir bendeki excel ingilizce) ondalýk ayracý ile binlik ayracý ne olarak görünüyor sizde?

[sender]

sayýn alpen ben texbox 3 otomatik toplam alýyorum yani buton kullanmýyorum...
kod larý her texboxsada yazýyorum

texbox3= texbox1*textbox2

[ALPEN]

araçlar> seçenekler> uluslararasý(farklý olabilir bendeki excel ingilizce) ondalýk ayracý ile binlik ayracý ne olarak görünüyor sizde?

[sender]

syýn alpen ondalýk ayraç , binlik ayraç .
onlarla ilgili bir problem yok.

sadece aramýzda bir iletiþimm bozukluðu oldu galiba.

bu kodlarý bir butona atayýnca tamam oluyor ama
t3 kendi toplasýn diyorum ben. butona basmadan.

[ALPEN]

harbiden koptu iletiþim.

Private Sub TextBox1_Change()
TextBox1.Value = Format(TextBox1, "#,##0")
If IsNumeric(TextBox1) = True And IsNumeric(TextBox2) = True Then
TextBox3 = TextBox1 * TextBox2
TextBox3.Value = Format(TextBox3, "#,##0")
End If
End Sub

Private Sub TextBox2_Change()
TextBox2.Value = Format(TextBox2, "#,##0")
If IsNumeric(TextBox1) = True And IsNumeric(TextBox2) = True Then
TextBox3 = TextBox1 * TextBox2
TextBox3.Value = Format(TextBox3, "#,##0")
End If
End Sub

[sender]

sayýn alpen cevaplarýnýz için çok teþekkür ediyorum...
E hocam neolcak Bu kadar çok excel bilgisine sahip olursanýz cevap vermek için ordan oraya koþarsanýz üyelerin sorduðu sorularý karýþtýrýrsýnýz.. :mrgreen: :mrgreen: :mrgreen: :mrgreen:

[BeyazGölge]

Arkadaþlar Sayýn ALPEN'nin verdiði kodu çalýþtýrdým sorunsuz çalýþýyor.

Fakat çarpýmýn yapýldýðý textboxlarý toplamaya kalkdýðýmýz zaman sayý gibi (2 + 2 = 4) üstüste toplama yerine birleþtiriyor ( 2 + 2 = 22).

Bu sorunu halledebilirmiyiz. Ben kafayý yedim bir türlü çözemedim.. :kafa:

[Levent Menteþoðlu]

sorunuzun cevabý aþaðýdaki linkte mevcuttur.

http://www.excel.web.tr/viewtopic.php?p=5190&highlight=#5190

selamlar

[BeyazGölge]

Teþekkür ederim. Ýþe yarar bir bilgi.