Ich glaube das geht besser mit der Funktion "INSTR":
Ein_empfangen = Instr(inputstring , "Ein")