OpenOffice.info

Hallo Balu,

auch dir besten Dank für deinen Beistand :)

habe es jetzt mit left() und right() realisiert, replace() kam in diesem Fall nicht in Frage
da es um eine genaue platziertes Ersetzen/hinzufügen ging (also mit Positionsangabe)

hier ist das [url=http://de.openoffice.info/viewtopic.php?f=2&t=65686#p255065][b]Ergebnis meines Bemühens [/b][/url] anzusehen

Sub Main

sMyText = "Hallo World here I am"
sMyTextNew = replace(sMyText, " World", "")

print "sMyText = " & sMyText
print "sMyTextNew = " & sMyTextNew

sAlterText = "Hallo here I am"
sNeuerText = replace(sAlterText, "Hallo ", "Hallo World ")

print "sAlterText = " & sAlterText
print "sNeuerText = " & sNeuerText

End Sub

Hallo clag,

muss es den unbedingt [b]mid [/b]sein?
Für Textersetzungen nehme ich sehr gerne [color=#008000][b]replace[/b][/color]. Siehe auch [b][u]Andrew Pitonyak[/u][/b].

[code]
Sub Main

sMyText = "Hallo World here I am"
sMyTextNew = replace(sMyText, " World", "")

print "sMyText = " & sMyText
print "sMyTextNew = " & sMyTextNew

sAlterText = "Hallo here I am"
sNeuerText = replace(sAlterText, "Hallo ", "Hallo World ")

print "sAlterText = " & sAlterText
print "sNeuerText = " & sNeuerText

End Sub
[/code]

Versuchs mal damit, vielleicht kommst Du damit besser zurecht. Wünsche dir dabei viel Spaß und Erfolg :D .



Gruß
balu

left(mytext,i) & "xxx" & right(mytext,len(mytext)-i)

Hallo Stephan,

danke dir für die schnelle Antwort,
also kann ich mit mid() tatsächlich den String nur eindampfen !?

ok muss ich mir halt was anderes ausdenken bleibt wohl nur

[code]left(mytext,i) & "xxx" & right(mytext,len(mytext)-i)[/code]
oder so

Die Programmhilfe sagt bei MID u.A.:

[i]"Ist der Längenparameter der Mid-Anweisung kleiner als die Länge des zu ersetzenden Textes, so wird der Text auf die angegebene Länge gekürzt."
[/i]

was in Deinem Falle heißt das Du versuchst ein Leerzeichen durch den auf ein Zeichen gekürzten Ersetzungstext zu ersetzen, da der ERsetzungfstext jedoch mit einem Leerzeichen beginnt, ersetzt Du somit nur Leerzeichen gegen Leerzeichen.


Gruß
Stephan

mytext = "Hallo World here I am"
mid(mytext, 6, 6, "")

mytext = "Hallo here I am"
mid(mytext, 6, 1, " World")

Hallo Kenner und Könner,

wie der es Titel schon sagt foppt mich [color=#0000FF]mid()[/color] gerade und ich bin gerade im Modus "ratlos"
ich kann zwar mit [color=#0000FF]mid()[/color] den String verkürzen aber nichts einfügen !?

aus "[color=#4000BF]Hallo World here I am[/color]" wird mit folgenden Ccode

[code]mytext = "Hallo World here I am"
mid(mytext, 6, 6, "")
[/code]
"[color=#4000BF]Hallo here I am[/color]" soweit so gut und wie erwartet.


Aber diese Verkürzung wieder rückgängig machen zB mit

[code]mytext = "Hallo here I am"
mid(mytext, 6, 1, " World")
[/code]
geht nicht
statt des von mir erwarteten "[color=#4000BF]Hallo World here I am[/color]"
gibt es ein wenig hilfreiches "[color=#EF0000]Hallo here I am[/color]" zurück. :-x


ist das tatsächlich so? oder setze ich etwas falsches vorraus