Archive of Mr Excel Message Board

Back to Controls in Excel archive index
Back to archive home

a comma in a textbox

Posted by Sandy on December 02, 2001 6:06 PM

Hi group,
Is it possible to set up my textboxes so as to when i
enter 1000 i get 1,000.
Thanks, Sandy

Re: a comma in a textbox

Posted by Bariloche on December 02, 2001 6:34 PM

Sandy,

Could you be more specific? When do you want the comma to appear? While the form is still displayed or when the data is entered on a spreadsheet?

thanks

Re: a comma in a textbox

Posted by Sandy on December 02, 2001 6:46 PM

Only when the form is diplayed
Thanks
Sandy

Re: a comma in a textbox

Posted by Bariloche on December 02, 2001 7:14 PM

Sandy,

Looks like your best choice is to use the BeforeUpdate event, like so:

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)

If IsNumeric(TextBox1.Text) Then
TextBox1.Text = Format(TextBox1.Text, "#,###")
Else
MsgBox "Hey! Enter a number!"
TextBox1.Text = ""
End If

End Sub

Paste that into the code sheet for your text box and when the user tabs to the next box or control the text will update with a comma. Some additional code may be necessary, but that should get you started.

have fun

Thank You!, Bariloche(NT)

Posted by Sandy on December 02, 2001 7:29 PM

Looks like your best choice is to use the BeforeUpdate event, like so: Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean) If IsNumeric(TextBox1.Text) Then

: Only when the form is diplayed : Thanks : Sandy

This archive is from the original message board at www.MrExcel.com.
All contents © 1998-2004 MrExcel.com.
Visit our online store to buy searchable CD's with thousands of VBA and Excel answers.
Microsoft Excel is a registered trademark of the Microsoft Corporation.
MrExcel is a registered trademark of Tickling Keys, Inc.