Calculating with textboxes....
Thanks Harald and Steve.
"Harald Staff" wrote in message
...
Hi Mark
Don't trust a textbox's value property. Convert its text to number before
calculation:
Sub test()
MsgBox CDbl("1.234,56")
End Sub
Dim R As Double
R = CDbl(.tbAmount.Text) * 0.19
.tbVat.Text = Format(R, "#,###.##")
Note that Format and VBA calculations use the american logic , for
thousands and . for
decimals. You'll get used to it after a while.
-
HTH. Best wishes Harald
Followup to newsgroup only please.
"Mark Rosenkrantz" wrote in message
...
Dear all;
I have a UserForm with a few textboxes.
The first textbox : tbAmount holds an invoice amount.
The second textbox: tbVAT should display the amount of VAT (
19 %
of the amount )
The formula I use is: .tbVAT.Value = .tbAmount.Value * 0.19
Looks fine to me.
But, the stupid box don't disply the right amount.
I live in Europe and the Regional settings are a dot ( . ) for the
thousands
seporator and a comma ( , ) for the decimal seporator.
When I enter 2250,00 ( or 2250 ) in .tbAmount, then textbox .tbVat
displays
:
427.5 which is not what I want as I hope to see :
427,50
When I bring these values over to the worksheet it displays :
? 2250,00 which is OK, and
? 4275,00 which is not OK, as I want to see:
? 427,50
Apparantly there is some error in the way the textboxes work with
thousands.
What is wrong with me ???? ( assuming I am not perfect )
I can't see what I did wrong.
Mark.
|