Mit #VBA können Sie leicht herausfinden, ob ein #Text in einem anderen #enthalten ist oder nicht – verwenden Sie dafür die Funktion #Instr:

Instr(Start,TextInDemSieSuchen,TextDenSieSuchen,[Vergleichsart])

liefert die Position in TextInDemSieSuchen, an der – angefangen bei Position Start – der TextDenSieSuchen das erste Mal gefunden wird. Wird er gar nicht gefunden, so ist das Ergebnis 0.

Vergleichsart müssen Sie nicht angeben. vbBinaryCompare bedeutet, dass Ihnen Groß- und Kleinschreibung wichtig ist, vbTextCompare hingegen, dass Sie a wie A behandeln wollen, vbUseCompareOption hat keine klare Meinung – es verwendet die Einstellung, die mit Option Compare getroffen wurde, und in Access gibt’s auch noch vbDatabaseCompare – so, wie die Datenbank eingestellt ist, wird auch hier verglichen.

So, jetzt aber Beispiele:

Instr(1;“Katharina“;“a“) ergibt 2

Instr(3;“Katharina“;“a“) ergibt 5

Instr(1;“Katharina“,“o“) ergibt 0

Instr(1;“Katharina“;“A“;vbBinaryCompare) ergibt 0

Instr(1;“Katharina“;“ar“) ergibt 5.