You can use something like:

Option Explicit
Private Sub UserForm_Initialize()
Me.TextBox1.Value = Format(1234.23, "$#,##0.00")
End Sub


Robo wrote:

The values of a text box on a UserForm appear as numbers. I want to diplay
the value of these text boxes in currency format when the form is opened.
How do I write the code to ensure currency format is always displayed?
--
Thanks,
Robo

--

Dave Peterson