View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Mark Rosenkrantz Mark Rosenkrantz is offline
external usenet poster
 
Posts: 10
Default 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.