How do I Format to display a fractional value regardless of user's country?

[PoggiPJ]

How could you modify the following format statement so that the UserForm will always display properly regardless of the user's country settings? All users will run the same application copy, so I cannot make different versions with the appropriate code for that country.

Dim RateFactor As Single

RateFactor = 1.234

userform.variable = Format(RateFactor, "number")

For example, in the UK, I need this to display as 1,234 but in the US, I need it to display as 1.234

Right now, all I see is a blank userform field.

 

[Marcelo Branco]

Hi,

I think you dont need any special format.

This worked for me

Private Sub UserForm_Initialize()
    Dim RateFactor As Single
    RateFactor = 1.234
    Me.TextBox1 = RateFactor
End Sub

and the TextBox shows 1,234 accordingly to my Regional Settings, ie,
decimal separator = , (comma)

M.

 

[PoggiPJ]

Interesting. I thought that is what I had originally and it didn't work in Germany.

 

[Marcelo Branco]

Interesting. I thought that is what I had originally and it didn't work in Germany.

Weird...only in Germany?

I have never faced problems with numbers.

Sometimes with dates (my regional setting is dd/mm/yyyy) i had some problems but always got a workaround.

M.

 

[PoggiPJ]

No, Marcelo - I stand corrected. I changed it as you described, and then tested it by changing my own Regional Settings. It works as advertised, so I must be confused in what I had coded previously.
Thank you!

 

[Marcelo Branco]

No, Marcelo - I stand corrected. I changed it as you described, and then tested it by changing my own Regional Settings. It works as advertised, so I must be confused in what I had coded previously.
Thank you!

Great!

Glad for providing some help

M.