wie kann ich per vba-Code in einer einzelnen Zelle einer Exceltabelle nach einen bestimmten Teilstring suchen lassen ?
Das ganze kommt dann noch in eine Schleife rein.
Gruß
Udo
Dim Gefunden As Integer
Gefunden = InStr(ActiveCell.Value, "Suchwort")
bekommst Du die Anfangsposition.
und anschließend mit:
Gefunden 0
ob gefunden oder nicht. Aber das geht natürlich auch direkt.
Gruß
Uwe
(:o)
Public Sub Muster()
Dim iPosition As Integer
If InStr(Range("A1").Value, "Hugo") > 0 Then
MsgBox "der Begriff 'Hugo' wurde gefunden."
iPosition = InStr(Range("A1").Value, "Hugo")
MsgBox "der Begriff 'Hugo' steht ab Position " & iPosition & " in der Zelle."
Else
MsgBox "der Begriff 'Hugo' wurde leider nicht gefunden."
End If
End Sub
Gruß Peter