Herbers Excel-Forum - das Archiv

Teilstring suchen (VBA)

Bild

Betrifft: Teilstring suchen (VBA)
von: Holger Levetzow

Geschrieben am: 24.02.2005 09:29:25
Guten Morgen allen,
ich versuche, in einem String zu testen, ob ein Teilstring vorkommt. Dazu habe ich WorksheetFunction.Find(j, text) und auch search versucht. Aber wenn der Teilstring nicht vorkommt, bricht der Code ab. Auch Abfangen mit iserror hat nicht geklappt. Hat jemand eine Idee?
Danke Holger
Bild

Betrifft: AW: Teilstring suchen (VBA)
von: Bert
Geschrieben am: 24.02.2005 09:30:57
Hilfreich ist immer ein Codeschnipsel.
Bert
Bild

Betrifft: AW: Teilstring suchen (VBA)
von: Holger Levetzow

Geschrieben am: 24.02.2005 12:19:50
Hallo Bert,
Danke für die Antwort. Der Codeschnipsel war eigentlich dabei. Es soll so aussehen:
j = "5"
text = "1234"
'If IsError(WorksheetFunction.Find(j, text)) Then GoTo weiter
i = WorksheetFunction.Find(j, text) 'Versuch mit find
i = WorksheetFunction.Search(j, text) 'Versuch mit search
If IsError(WorksheetFunction.Find(j, text)) Then ... 'Versuch, den Fehler auszuwerten
mit "on error resume next" kann ich den Fehler zwar überspringen, aber es die folgenden Befehle nur abgearbeitet werden, wenn kein Fehler vorliegt. Also habe ich es mit

On Error GoTo weiter
i = WorksheetFunction.Find(j, text)
...
weiter:
versucht. Allerdings ist der Teil in einer Schleife, z.B.
for k=1 to 10
On Error GoTo weiter
i = WorksheetFunction.Find(j, text)
... einige Befehle
weiter:
next
beim 1. Durchlauf klappt es, beim 2. kommt wieder der Hinweis: Fehler 1004.
Holger
Bild

Betrifft: AW: Teilstring suchen (VBA)
von: Kurt
Geschrieben am: 24.02.2005 12:24:20
ähh,
mal ne doofe Frage
warum nimmst du nicht instr ?
Bild

Betrifft: AW: Teilstring suchen (VBA)
von: Holger Levetzow
Geschrieben am: 24.02.2005 13:38:53
Hallo Kurt,
das ist wirklich eine doofe Frage: na, weil ich nicht darauf gekommen bin :-)
Danke für den Tip.
Holger
Bild

Betrifft: Danke für die Rückmeldung
von: Kurt
Geschrieben am: 24.02.2005 13:53:54
Hi Holger,
ich habe mich nur nicht getraut dir das direkt vorzuschlagen ;-)
...und Tschüss Kurt
 Bild
Excel-Beispiele zum Thema "Teilstring suchen (VBA)"
Teilstrings vergleichen und markieren Zellinhalt suchen und Zelle auswählen
Suchbegriff über mehrere Tabellenblätter suchen. Suchen und weitersuchen
Zahl +/- 1 suchen Ein Zeichen in einer Formel suchen
Datum suchen und Wert eintragen Wert in Tabelle suchen und in UserForm ausgeben
Letzte Zelle mit Inhalt suchen Textdatei nach Begriff durchsuchen und Fundzeile importieren