Limit size of number input

[Jock]

Hi,
I have a text box on a user form which has been limited to accept only two
digits.
Taking this a step further, can it be coded to only acept numbers between 1
and 14 inclusive? If, for example, a user tried to input 17, could a message
box pop up informing the user of the allowed range?
tia

 

[Rick Rothstein]

Incorporate this code into the Change event procedure for the TextBox...

If TextBox1.Value <> "" And TextBox1.Value > 14 Then
MsgBox "Number is too large!"
End If

Note that I have assumed your TextBox is named TextBox1 for my example...
change the TextBox references to your actual TextBox names when implementing
this code.

 

[Mike H]

Jock,

You could do something like this

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
If Val(TextBox1) > 14 Or Val(TextBox1) < 1 Or Not IsNumeric(TextBox1) Then
TextBox1.Text = ""
MsgBox "Numbers only between 1 & 14 - Please re-enter"
Cancel = True
End If
End Sub

Mike