posición de cadena de búsqueda de VBA
'Position of "DOG" from 8th character, case insensitive
Debug.Print InStr(8, "My Dog is a dog", "DOG", vbTextCompare) ' 13
VasteMonde