Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Replace

Forumthread: Replace

Replace
23.01.2017 16: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 17:04:41
onur
Replace("Text 1 2", " ", "+",6)
Das ergibt 1+2, onur! Das war aber nicht ...
23.01.2017 19: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 19:57:43
onur
Peinlich, peinlich....
AW: Replace
23.01.2017 17: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 17:37:21
Edwin
Perfekt!
Super, vielen Dank
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige