User form text box question

[jcaptchaos2]

Is there a way to prevent someone from entering something into a text box on a user form that is not in a list? If I name the list can I enter that name some where in the properties to prevent it from being entered?

Thanks

 

[jcaptchaos2]

Private Sub txtemplon_Change()
If Me.txtemplon.MatchFound = False Then
    MsgBox "Incorrect Item Number.", vbInformation, "Invalid Entry"
    Cancel = True
End If


End Sub

 

[jcaptchaos2]

DK,
Also once the error comes up if I hit the enter button it puts it in the table anyways.

 

[dk]

It needs to be this - delete the txtemplon_Change macro.

Private Sub txtemplon_BeforeUpdate()
If Me.txtemplon.MatchFound = False Then
    MsgBox "Incorrect Item Number.", vbInformation, "Invalid Entry"
    Cancel = True
End If


End Sub

 

[jcaptchaos2]

Ok now I get a Compile error:
Procedure declaration does not match description of event or
procedure having the same name.

 

[jcaptchaos2]

In row source I have "employeenumber" that is the name of my list of numbers

 

[dk]

Sorry, that was my fault. Try this instead:

Private Sub txtemplon_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
If Me.txtemplon.MatchFound = False Then
    MsgBox "Incorrect Item Number.", vbInformation, "Invalid Entry"
    Cancel = True
End If
End Sub

 

[jcaptchaos2]

Well now when I press the enter button it gives me the error evin if the number is in the named range.

Thanks for your help on this

 

[dk]

Which error are you getting - is it your custom one or the "Invalid Property Value" one?

Have you made sure that the combobox MatchEntry is set to False?

 

[jcaptchaos2]

Custom - "Incorrect Item Number"

Match Enter set to : none

Match Required to : false

 

[jcaptchaos2]

Sorry Matchentry : none