View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Chip Pearson Chip Pearson is offline
external usenet poster
 
Posts: 7,247
Default Textbox formatting

Todd,

Try something like the following:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Left(Me.TextBox1.Text, 1) < "$" Then
Me.TextBox1.Text = "$" & Me.TextBox1.Text
End If
End Sub


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Todd Huttenstine" wrote in message
...
Hey guys,

I still cannot get a $ sign to come up before everything I type

in a
textbox.


I want to be able to type in lets say TextBox1 and when I do,

the $ sign
pops up in front of the number. I need the dollar sign to

always be there
no matter how many times I re-enter numbers and I need it to

format the cell
as $0.00