+- Office-Fragen.de (https://office-fragen.de)
+-- Forum: Microsoft Office (https://office-fragen.de/forum-1.html)
+--- Forum: Excel (https://office-fragen.de/forum-2.html)
+--- Thema: VBA Replace: Quell- und Zielspalte definieren (/thread-3193.html)
VBA Replace: Quell- und Zielspalte definieren - Zitrone99 - 30.09.2019
Hallo Zusammen,
da ich leider ein kompletter Neuling auf dem Gebiet Makros/ VBA bin, könnte ich zur Replace Funktion Hilfe gebrauchen.
Folgendes Szenario:
Die Excel besteht aus 2 Arbeitsmappen. In Mappe1.Spalte A ist in jeder Zelle ein Text eingepflegt. Diese Spalte soll nun durchsucht werden, bestimmte Wörter ersetzt und das Ergebnis in Mappe2.Spalte B abgelegt werden. Folgender Code steht bereits zur Verfügung:Code:
Sub Allergene_Ersetzen()
Dim suchArray()
Dim ersetzArray()
Dim k As Long
MatchCase = True
suchArray = Array("Vollmilch", "Soja")
ersetzArray = Array("Voll<strong>milch</strong>", "<strong>Soja</strong>")
For k = LBound(suchArray) To UBound(suchArray)
Call ActiveSheet.UsedRange.Replace(suchArray(k), _
ersetzArray(k), _
, _
, _
False)
Next k
End SubAllerdings werden damit in der aktuellen Mappe alle Zellen bearbeitet und die ursprünglichen Daten überschrieben.
Ich hoffe ihr könnt mir weiterhelfen.
Schon einmal vielen Dank!
RE: VBA Replace: Quell- und Zielspalte definieren - Mase - 30.09.2019
Hi,
Du hast im VBA-Forum bereits eine Antwort auf Deine Frage bekommen.
http://www.vba-forum.de/forum/View.aspx?ziel=53892-Replace:_Quell-_und_Zielspalte_definieren
RE: VBA Replace: Quell- und Zielspalte definieren - Zitrone99 - 30.09.2019
Hey Marco,
vielen Dank fürs Bescheid geben.
Viele Grüße
Simon
RE: VBA Replace: Quell- und Zielspalte definieren - steve1da - 30.09.2019
Hola,
nicht nur da......
https://www.herber.de/forum/messages/1715556.html
Gruß,
steve1da
RE: VBA Replace: Quell- und Zielspalte definieren - Mase - 30.09.2019
In diesem Fall, werde Ich meine Hilfe einstellen.