Form Textbox to only allow a-z, 0-9 and a few other values

[paldob]

Is there a way where I can limited a userform textbox to only allow the following to be entered

• a-z
• A-Z
• 0-9
• Full Stop .
• Comma ,
• Forward Slash /
• Backward Slash \
• Minus -
• Single Space

With a msgbox popping up if any other value is entered.

My code that I have brings up an error message but continues to allow the person to enter unwanted values.

My Textbox is called tComments.

Thanks
P

 

[hotabae]

Is there a way where I can limited a userform textbox to only allow the following to be entered

• a-z
• A-Z
• 0-9
• Full Stop .
• Comma ,
• Forward Slash /
• Backward Slash \
• Minus -
• Single Space

With a msgbox popping up if any other value is entered.

My code that I have brings up an error message but continues to allow the person to enter unwanted values.

My Textbox is called tComments.

Thanks
P

I have done similar things with textboxes by using RegEx (Regular Expressions). It checks for certain patterns in strings, and is well worth looking into. Googling "VBA Excel RegEx" should net some good information.

 

[Gaddy]

In which event do you have your code?

You need to use the BeforeUpdate event and then if what's entered doesn't meet your criteria, then you need to use

Cancel = True

 

[MickG]

Try this:-

Private [COLOR=navy]Sub[/COLOR] TextBox1_KeyPress(ByVal KeyAscii [COLOR=navy]As[/COLOR] MSForms.ReturnInteger)
    [COLOR=navy]Select[/COLOR] [COLOR=navy]Case[/COLOR] KeyAscii
        [COLOR=navy]Case[/COLOR] 48 To 57
        [COLOR=navy]Case[/COLOR] 97 To 122
        [COLOR=navy]Case[/COLOR] 65 To 90
        [COLOR=navy]Case[/COLOR] 46, 47, 92, 45, 32, 44
    [COLOR=navy]Case[/COLOR] [COLOR=navy]Else[/COLOR]
        KeyAscii = 0
[COLOR=navy]End[/COLOR] Select
[COLOR=navy]End[/COLOR] [COLOR=navy]Sub[/COLOR]

Regards Mick