In the code below, in addition to testing for the occurence of any of the words in the list "Keywords_PAX". I need to be able to test for the presence of any 2-4 character alphanumerics, where the numbers will range from 1 to 100, and the letters will range from A to K. Examples: 1D, 23ACDF, 52HK. How would I do that? Can it be added to this code or will I need to do it with a more elaborate code involving RegEx?
Dim cel As Range, x As Range
For Each cel In [Fault_FuncGrpsCnt]
Set x = cel.Offset(0, -5)
If x.Worksheet.Evaluate("COUNT(MATCH(""*""&Keywords_PAX&""*""," & x.Address & ",0))") > 0 Then
cel = "PAX"
Else: End If