Variablen String mit VBA suchen

Computer: Software & Programmierung Office Software
1

Hallo Leute,

Habe Probleme mit dem Suchen von variablen Strings. Problembeschreibung:
Habe in einer Spalte Nummern der Form „3204766893+xxxx“. Dabei will ich den Zahlenwert durch eine neue Nummer ersetzen, z.B. 000001. Nun habe ich Stringvariablen deklariert Wert1, Wert2, Wert3. Mit Wert1 lese ich die Ziffern aus [Wert1 = Left(ActiveCell.Value, 10)], mit Wert2 die ersten 5 Ziffern [Wert2 = Left(ActiveCell.Value, 5)] und mit Wert 3 die hinteren 5 Ziffern [Wert3 = Mid(ActiveCell.Value, 6, 5)]. Nun habe ich Vergleichswerte mit Zahlen der Form 32047 66893. Diesen Wert will ich an Hand der ausgelesenen Werte suchen. Suche ich direkt mit „Cells.Find(What:=„32047 66893“).Activate“ wird der Wert gefunden, suche ich aber mit der Variablen „Wert = Wert2 & Chr(10) & Wert3“: "„Cells.Find(What:=Wert).Activate“ dann bekomme ich immer die Fehlermeldung „Laufzeitfehler ‚91‘: Objektvariable oder With-Blockvariable nicht festgelegt“ obwohl sonst alles stimmt. Was ist hier falsch? Kann mir jemand helfen! Vielen Danke für eure Hilfe!!!
Bernhard

2

Hallo,

ich verstehe nicht, wieso du die Zeichenkette „32047 66893“ direkt findest. Schließlich hast du ja „nur“ eine Zeichenkette, die „3204766893“ lautet.
Nun habe ich aus deiner Zeile das Chr(10) & entfernt, so dass Wert = Wert2 & Wert3 steht - und er fand das Ergebnis.

Gruß

3

Funktioniert
Danke,
den Wert „32047 66893“ finde ich, weil er in einer Referenzspalte steht, wo ich diesen Wert suche, rechts daneben steht der neue Wert, mit dem „32047 66893“ oder „3204766893“ dann ersetzt werden soll.