Instr mit mehreren Vergleichen
27.01.2005 08:49:18
Torsten
ich habe einen String und möchte prüfen ob einer von z.B. 5 kleineren Strings in dem ersten String enthalten ist. Dies ist anschaulich in unterem Code dargestellt mit ?.
Kann man das mit Instr überhaupt machen oder gibt es da eine bessere (kompakte Lösung). Letztlich habe ich in Spalte A einige Einträge und ich brauche die Zeile in der erstmalig einer der Vergleichsstrings in der entsprechenden Zelle in Spalte A auftritt.
Danke im voraus.
Torsten
Sub check()
Dim strCheck As String
If InStr(1, Range("Weltreise"), "lt",?, ?, ?) > 0 Then
msgbox "OK"
End If
End Sub