Verify Textbox Data is on Array

Guessed · #2 12-10-2022, 05:43 PM

I don't think AfterUpdate is the right trigger. Try using the trigger of leaving the text box instead.

Code:

Private Sub ObjectCode_Exit(ByVal Cancel As MSForms.ReturnBoolean)
  Dim sVals As String, sEntry As String
  sVals = "6119,6121,6129,6139,6141,6142,6413,6145,6146,6148,6149,6223,6237,6238,6239,6249,6256,6259,6267,6268,6269,6291,6293,6294,6299,6329,6339,6395,6399,6410,6411,6497,6499"
  sEntry = Me.ObjectCode.Value
  If Len(sEntry) <> 4 Or Not sVals Like "*" & sEntry & "*" Then
    MsgBox "Not a valid Object Code. Please verify and try again", vbOKOnly, "Invalid Input"
    Me.ObjectCode.Value = Null
    Cancel = True
  End If
End Sub

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Switch to Hybrid Mode Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
textbox dependent on comboboxes data list	Visor	Word VBA	2	08-05-2019 05:19 AM
Data connection problem excel/sharepoint using an SUMIF array	mwestra74	Excel Programming	10	11-28-2017 06:26 PM
How do I make a checkbox or dropdown item reference data in that specific section of the data array?	dhare	Excel Programming	2	02-24-2016 12:36 PM
Convert String Array to Integer Array from a User Input?	tinfanide	Excel Programming	4	12-26-2012 08:56 PM
How to count the frequency of data and also tally value from an array of Excel record	KIM SOLIS	Excel	5	09-07-2011 09:01 AM