Vba agregar caso de la sensibilidad

vba Quitar la Sensibilidad a mayúsculas

'Removes case sensitivity
Option Compare Text
'Adds case sensitivity
Option Compare Binary
'Compare
debug.print StrComp(string1, string2, vbUseCompareOption) 'with choosen option
debug.print StrComp(string1, string2, vbBinaryCompare)	  'case sensitive
debug.print StrComp(string1, string2, vbTextCompare)      'case insensitive