how to make all character in case sensitive in excel VBA code example

Example: 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.
'
'
'