restrict user to enter 5 digits only

[sam]

How can we restrict users to enter 5 digits only in a userform textbox?

TIA

 

[Mike H]

Hi,

I simple way is to set the maxlengrh property to 5. Right click the textbox,
properties abd you'll see the propery of maxlength.

Mike

 

[Eduardo]

Hi Tia,
Go to visual basic, view object, position in the textbox you want to enter
the limit, then choose Categorized, under Behavior look into MaxLength and
enter 5 there

 

[Dave Peterson]

You have to check yourself.

Option Explicit
Private Sub CommandButton1_Click()
MsgBox Me.TextBox1.Value
End Sub
Private Sub CommandButton2_Click()
Unload Me
End Sub
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim iCtr As Long
Dim myStr As String
Dim OkValue As Boolean

myStr = Me.TextBox1.Value

OkValue = True
If Len(myStr) <> 5 Then
OkValue = False
Else
For iCtr = 1 To 5
If IsNumeric(Mid(myStr, iCtr, 1)) Then
'keep looking
Else
OkValue = False
Exit For 'stop looking
End If
Next iCtr
End If
Cancel = Not (OkValue)
End Sub
Private Sub UserForm_Initialize()
'the cancel button
'allows the user to hit that button even if
'the entry in the textbox is invalid
Me.CommandButton2.TakeFocusOnClick = False
End Sub

 

[sam]

thanks a lot, this worked out great. we can set the max value from property
box, but do you know how we can set min values?

 

[sam]

thanks a lot, this worked out great. we can set the max value from property
box, but do you know how we can set min values?