Formatting a Userform TextBox As Currency...

[chazrab]

Is there an easy way to format a UserForm that contains many Textboxes ALL as Currency? THe values can be

$#.##, $##.##, $###.## or $#,###.##.

Is there an easy way to do this without having to type a lot of code for each textbox.

Remark: I am surprised that there is no property item that would allow the setting of formats for a textbox from a drop down list box.

Thank you for ANYONE's help.

CR

 

[Norie]

CR

You could try something like this.

For Each ctl In Me.Controls
       If TypeName(ctl) = "TextBox" Then
            ctl.Value = Format(ctl.Value, "$#.##")
       End If
Next ctl

Comment:

Why are you surprised?

Excel deals with numbers, as soon as you use something like Format you end up with text.

Then if you want to use the values in calculations you need to convert them from text to numbers.