Formatting a VBA Form as Currency

ok, here it is, i was thinking it would be much easier, but i can't seem to get it.

there are 6 categories that i need to format as a currency, they are:


Assigned Fee
Billing Rate
Tax Strategies Fee
Transactional Tax Fee
Business Valuation Fee
Website Fee

here's the workbook, i'm pretty lost.

I just learned that you can use format names in a Format function -- my Excel lesson for the day, thanks, Roy.

You could generalize Roy's approach a tad:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    FormatCurrency Me.TextBox1
End Sub

Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    FormatCurrency Me.TextBox2
End Sub

Sub FormatCurrency(ctl As MSForms.TextBox)
    If Len(ctl.Value) Then ctl.Value = Format(ctl.Value, "Currency")
End Sub