• Home
 · 
• String Manipulation
 · 
• Match() Check any string for any number of characters.

Match() Check any string for any number of characters.

Simple function to validate string contents. Compares a given string to a list of illegal values and evaluates whether or not it contains any. Very fast and easy. Can also be used as a string search function with a little modification.

Inputs
strSource - String you are checking strCompare - String of illegal characters

Assumes
To run: If Match (strMyFile, "~!@#$%^&*()+`{}[]?><,/") Then MsgBox "File contains illegal characters!", vbExclaimation End If .

Returns
Boolean - True = Source string contains an illegal character.

Rate Match() Check any string for any number of characters.

• 1
• 2
• 3
• 4
• 5

(4(4 Vote))

Public Function Match(strSource As String, strCompare As String) As Boolean
Dim lngCheck As Long
 
 For lngCheck = 1 To Len(strCompare)
 If InStr(strSource, Mid(strCompare, lngCheck, 1)) Then
 Match = True
 Exit Function
 End If
 
 Next lngCheck
End Function