text box entry format

[mark kubicki]

is ther an easy way to limit the entry into a text box to ONLY be numneric
(alpha can't be entered at all).
and then a second question: cold the numeric be given an automatic format
(ex: ###0.00)

 

[Tom Ogilvy]

check out Harald Staff's posts in this thread:

http://groups.google.com/groups?threadm=#[email protected]

 

[Mike Tomasura]

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0

End Sub

 

[Tod]

You can use the click event to test the keystroke and
cancel it if it's not a number, like this:

Private Sub TextBox1_KeyPress(ByVal KeyAscii As
MSForms.ReturnInteger)
If KeyAscii > 47 And KeyAscii < 58 Then KeyAscii = 0
End Sub

This is the XP version. I don't know if the Excel 2000
uses the same arguments.

 

[Bob Phillips]

It's easy to trap the input, like so

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
If KeyAscii < 48 Or KeyAscii > 57 Then
KeyAscii = 0
End If
End Sub

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)