I have a text box, and I want the user to enter a dollar
value. How do I force the entry to a currency, and how do
I display it as $123.45 ??

Thanks in advance...

Hi,
Try formating the column for $ and Choose 2 decimals.
Sazi

--
Message posted from http://www.ExcelForum.com

But this is a text box in a VBA form - not a cell on the
worksheet. Formatting the column doesn't work on a form
(unless I'm missing something in your reply...)

Thanks - Jeff


-----Original Message-----
Hi,
Try formating the column for $ and Choose 2 decimals.
Saziz


---
Message posted from http://www.ExcelForum.com/

.

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
if isnumeric(Textbox1.Value) then
Textbox1.Value = Format(Textbox1.Value,"$ #,##0.00")
End if
End Sub

--
Regards,
Tom Ogilvy

"Jeff" wrote in message
...
But this is a text box in a VBA form - not a cell on the
worksheet. Formatting the column doesn't work on a form
(unless I'm missing something in your reply...)

Thanks - Jeff


-----Original Message-----
Hi,
Try formating the column for $ and Choose 2 decimals.
Saziz


---
Message posted from http://www.ExcelForum.com/

.