This worked for me:

Sub gh()
Sheets(1).TextBox1.Text = 123.751
MsgBox "OK"
Sheets(1).TextBox1.Text = _
Format(Sheet1.TextBox1.Text, "#,##0.00")
End Sub


"Gabe" wrote in message
...
I went in and formatted a cell to: 0;"0";0 so that all negative numbers
will
be converted to zero. I have a textbox on a userform that I need to do the
same thing. What code would I use? I tried this but it doesn't work:

txtRemain.Value = Format(txtRemain.Value, "#,#00;""0""")

Any help would be greatly appriciated.

Thanks,
~Gabe