OpenOffice.info

Hi turtle47,

dein Makro funzt prima und sogar ohne Nebenwirkung :D

also auch dir ein Daaaanke für die Äktschen

Hallo turtle47


so wie du dich schon vorher auf dem Boden rollst
frage ich mich gerade ob nach ausführen des Makro nicht [b][i]schwup[/i]s[/b] der Text weg ist und durch Leerzeichen ersetzt wurde :lol:
aber ausprobieren werde ich natürlich was du mir da anbietest ............. ich esse ja auch alles :mrgreen:

auch schönes WE :D

Sub Start_Leezeichen_entfernen
	oSheet = ThisComponent.CurrentController.getActiveSheet()
	oSelect=ThisComponent.CurrentSelection.getRangeAddress
	Start_Column=oSelect.StartColumn
	End_Column=oSelect.EndColumn
	Start_Row =oSelect.StartRow
	End_Row=oSelect.EndRow
	For sp = Start_Column to End_Column
	For ze = Start_Row to End_Row
	oCell = oSheet.getCellByPosition(sp,ze)
	CellString = oCell.String
	NewString = RTRIM(CellString(1))
	oCell.String = NewString
	next 
	next
	msgbox "Die Leerzeichen wurden entfernt" , 64 , "Text bereinigen"
End Sub

Hi Clag,

vielleicht wird ja auch folgendes Makro Dein Freund:

[code]Sub Start_Leezeichen_entfernen
oSheet = ThisComponent.CurrentController.getActiveSheet()
oSelect=ThisComponent.CurrentSelection.getRangeAddress
Start_Column=oSelect.StartColumn
End_Column=oSelect.EndColumn
Start_Row =oSelect.StartRow
End_Row=oSelect.EndRow
For sp = Start_Column to End_Column
For ze = Start_Row to End_Row
oCell = oSheet.getCellByPosition(sp,ze)
CellString = oCell.String
NewString = RTRIM(CellString(1))
oCell.String = NewString
next
next
msgbox "Die Leerzeichen wurden entfernt" , 64 , "Text bereinigen"
End Sub[/code]

Einfach den Zellbereich markieren und das Makro starten.
Schwubs sind die Leerzeichen am Ende verschwunden.[img]http://www.smiliemania.de/smilie.php?smile_ID=8356[/img]


Schönes Wochenende.

Jürgen

Ahh

danke euch Beiden ihr habt mich gleich in die richtige Richtung geschubst :D
"wenn ich von so ner blöden Sucherei genervt bin, reicht's manchmal nicht mal mehr für die normalen Sachen, da ist so'n Hinweis schon Prima"

GLÄTTEN() wäre auch noch so ein Zauberwort
aber die suchen ersetzen Aktion ist mir lieber, weil einmal über die Zellen drübergeputzt und erledigt :)


Daaaanke

Hallo,

vielleicht (!) geht's auch mit [b]Suchen/Ersetzen :: reguläre Ausdrücke:[/b]

Die F1-Taste sagt dazu:
[i][b]Liste der regulären Ausdrücke

$
Findet den Suchbegriff nur, wenn er am Absatzende steht. Sonderinhalte wie z. B. Leerfelder und an Zeichen verankerte Rahmen am Absatzende werden ignoriert. Beispiel "Peter$".[/b][/i]
In diesem Fall eben bei Suche [b]_$[/b]
(_ steht für Leerzeichen)

Habe mal ein paar Wörter eingegeben, am Ende noch ein Leerzeichen: funktionierte.

Viel Erfolg!

Hallo clag,

habe jetzt keine Zeit zum testen, aber versuch doch mal entweder mit =SÄUBERN(), oder aber mit =WECHSELN() die unerwünschten Leerzeichen zu elemenieren.


Gruß
balu

Hallo Leutz,

so die Ursache dafür habe ich jetzt heraus bekommen
es ist abhängig davon wie der html code aussieht :?

[color=#0000FF]<td>[/color]supertoller[color=#0000FF]</td><td>[/color]text[color=#0000FF]</td><td>[/color]versuch[color=#0000FF]</td>[/color]
sieht der html code so aus gibt es keine zusätzlichen Leerzeichen

[color=#0000FF]<td>[/color]supertoller[color=#0000FF]</td>[/color]
[color=#0000FF]<td>[/color]text[color=#0000FF]</td>[/color]
[color=#0000FF]<td>[/color]versuch[color=#0000FF]</td>[/color]

sind im html code die Zellen aber untereiander geschrieben, so hängt OOo offensichtlich das cr als "Leerzeichen" an den Zelleninhalt :(
wenn man dann daraus neue HYPERLINKS() machen will funktionieren die natürlich nicht

darum jetzt habe ich eine neue Frage !

mit welchem suchen/ersetzen Schema kann ich auf eventuell vorhandene Leerzeichen am Zelleninhalts-Ende prüfen und auch entfernen ?

schonmal Danke vorweg :)

<td>text aus der tabelle</td>  wird zu
   "text aus der tabelle " sollte aber 
   "text aus der tabelle" sein

Hallo Leutz

ich habe da mal wieder so ein Problemchen .........
wenn ich von einer html-tabelle text importiere (einfügen als unformatierter Text) dann ist in jeder Zelle an dem Text ein Leerzeichen angehängt,
dass in dem tabellen text nicht existiert :?
woran könnte das liegen

[code]
<td>text aus der tabelle</td> wird zu
"text aus der tabelle " sollte aber
"text aus der tabelle" sein[/code]
wenn man den Text als html einfügt ist das Leerzeichen nicht da

das war nicht immer so !