Hi,

I'm facing a very weird problem is one of my userforms. I have a lot of text boxes reading values from the worksheets behind. This is an example of the code I'm using to format the text boxes:

Private Sub OptionButton_IAD_Click()

Me.Controls.Item("txt1_6").Value = C_Companhia_1.Range("C24").Value
Me.txt1_6 = Format(Controls.Item("txt1_6").Value, "Currency")
Me.Controls.Item("txt1_7").Value = C_Companhia_1.Range("C23").Value
Me.txt1_7 = Format(Controls.Item("txt1_7").Value, "Currency")
Similar pieces of code like this are repeated in a dozen other text boxes. The funny thing is that, when I open the workbook application, some of my text boxes will be properly formatted, others won't. I have to go to the System\Control Panel\Regional Settings\Formats\Additional Settings\Reset to restore the default values of my local settings (I live in Europe, therefore I want my currency to be €).

Once I do this, all text boxes behave properly, but if I don't some text boxes will present the correct values but with wrong formatting.

What am I missing here?

Thanks!