vba case sensitive compare code example

Example 1: vba ignore case

'Removes case sensitivity
Option Compare Text			' a < B
'Adds case sensitivity
Option Compare Binary		' A < B < a < b
'Compare
Debug.Print StrComp(string1, string2, vbUseCompareOption) 'Microsoft Access only
Debug.Print StrComp(string1, string2, vbBinaryCompare)	  'case sensitive
Debug.Print StrComp(string1, string2, vbTextCompare)      'case insensitive

Example 2: excel vba Case-Insensitive String Comparison

MsgBox LCase(str1) = LCase(str2)


'Another option is to use vbTextCompare with the VBA StrComp() function:

MsgBox 0 = StrComp(str1, str2, vbTextCompare)

StrComp() will return -1 if str1 is less than str2.
StrComp() will return  0 if str1 is equal to str2.
StrComp() will return  1 if str1 is greater than str2.

'The above StrComp() examples are for when the optional 3rd argument
'is given as vbTextCompare. This results in a case-insensitive comparison.

'However, the StrComp() function defaults to vbBinaryCompare which
'results in case-SENSITVE comparisons.
'
'
'

Tags:

Vb Example