A = "Das ist ein Test"

Pos = InStr(1,UCase(A),"EIN")

Pos ist somit 9

Die 1 bei Instr gibt die Startposition an wo mit der "Suche" begonnen wird. Durch verwendung von UCase wird das ganze auch noch "Case Insensitive", also Gross/Kleinschreibung ist egal.