HERBERS Excel-Forum - das Archiv

Thema: Text ersetzen mit VBA | Herbers Excel-Forum

Text ersetzen mit VBA
alex

Hallo zusammen,
gibt es eine Möglichkeit einen Text ab einem bestimmten Zeichen bis zu einem bestimmten Zeichen zu ersetzen? z.B. Melder 1;Kein Zusatztext; .Der text zwischen den semikolon soll ersetzt werde, wobei der text zwischen den semikolon variabel sein kann.

AW: Text ersetzen mit VBA
Daniel

Hi
da gibts verschiedene Möglichkeiten, du kannst z.B. über die INSTR-Funktion die Position der Semikolons ermitteln und dann über LEFT() und MID() den Text in Teiltexte zerlegen und mit dem neuen Text wieder neu zusammenbauen.
oder du kannst die SPLIT-Funktion nutzen:
dim TeilTexte() as string
dim NeuerText as string
TeilTexte = Split("Melder 1;Kein Zusatztext; .", ";")
NeuerText = TeilTexte(0) & ";Dein neuer Text;" & TeilTexte(2)
Gruß, Daniel
AW: Text ersetzen mit VBA
alex

super das ist genau das was ich gesucht habe!
Danke Daniel
Gruß alex