Hai provato ad usare la funzione InStr?
o la funzione Filter?