VBA Suchen/Ersetzen
16.04.2013 21:51:27
WalterK
Vor einiger Zeit habe ich einen VBA-Code erhalten der Zellinhalte in Spalte A durchsucht und bei einem Treffer diesen durch den Zellinhalt aus Spalte D ersetzt. Vergleichsspalte ist C. Ein Beispiel ist im Anhang im Blatt Version 1 und funktioniert auch tadellos.
Ich suche jetzt eine Lösung die nur mit Strings funktioniert. Es sollen also in Spalte A Teilstrings der Vergleichsspalte C gesucht werden und bei einem Treffer mit dem Teilstring aus Spalte D ersetzen. Beim Blatt Version 2 habe ich den gleichen Code hineinkopiert, komme aber nicht dahinter was geändert werden muss.
Besten Dank für die Hilfe und Servus, Walter
https://www.herber.de/bbs/user/84906.xls