Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Anzeige
Inhaltsverzeichnis

Replace

Forumthread: Replace

Replace
23.01.2017 17:57:01
Edwin
Hallo,
ich habe ein kleines Problem mit Replace.
Replace("Text 1", " ", "+")
Ergebnis: Text+1
Replace("Text 1 2", " ", "+")
Ergebnis: Text+1+2
Ich hätte aber gerne "Text 1+2"
Wie kann ich das lösen?
LG
Edwin
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Replace
23.01.2017 18:04:41
onur
Replace("Text 1 2", " ", "+",6)
Das ergibt 1+2, onur! Das war aber nicht ...
23.01.2017 20:11:34
Luc:-?
…gefragt!
Bspw so geht das, Edwin:
Dim erg
erg = "Text 1 2"
Mid(erg, 7) = "+"
MsgBox erg

Feedback nicht unerwünscht! Gruß, Luc :-?
Besser informiert mit …
Anzeige
AW: Das ergibt 1+2, onur! Das war aber nicht ...
23.01.2017 20:57:43
onur
Peinlich, peinlich....
AW: Replace
23.01.2017 18:17:25
Daniel
Hi
probier mal:
worksheetfunction.substitute("Text 1 2", " ", "+", 2)
das ersetzt nicht alle, sondern nur das zweite Leerzeichen im Text.
wenn die Anzahl der Leerzeichen variabel ist und das letzte ausgetauscht werden soll, dann müssest du die Anzahl erst ermitteln, dh statt der 2 als letzten Parameter dann:
Len(DeinText)-Len(Replace(DeinText, " " , ""))
Als Alternative gäbe es noch die MID-Anweisung:
Dim txt  As String
txt = "Text 1 2"
Mid$(txt, InStrRev(txt, " "), 1) = "+"
Debug.Print txt
Gruß Daniel
Anzeige
AW: Replace
23.01.2017 18:37:21
Edwin
Perfekt!
Super, vielen Dank
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
14.05.2026 09:50:42
13.05.2026 19:14:18