Seite 1 von 1
Zwei mal Enter ersetzen
Verfasst: Sa, 09.04.2005 10:41
von Fantin
Hi!
Ich suche eine Möglichkeit mit der Suchen&Ersetzen-Funktion zwei mal Enter (also im Grunde zwei leere Zeilen eines Textdokuments) zu löschen.
Im dem Dokument, in dem ich das verwenden möchte tritt das über 100x auf, deswegen möchte ich es nicht von Hand machen.
Ich habe schon versucht zwei leere Zeilen zu markieren und zu in die Suchen&Ersetzen-Maske zu kopieren. Bei "Ersetzen durch" habe ich nichts eingetragen. Hatte leider keinen Erfolg.
Dann habe ich versucht, an Anfang und Ende der in die Maske kopierten zwei leeren Zeilen ein * zu stellen und habe reguläre Ausdrücke aktiviert.
Aus das half nichts!
Hat mir jemand einen Tipp?
Danke, Julius
Verfasst: Sa, 09.04.2005 13:12
von FranzX
Hallo Fantin,
aktiviere über Extras| Autokorrektur/Autoformat, Registerkarte Option die Option: "Leere Absätze entfernen"
Anschließend rufst du den Befehl: Format| Autoformat| Anwenden auf um das Dokument mit den neu eingestellten Optionen zu formatieren.
Dabei werden alle Leerabsätze entfernt.
Gruß
FranzX
------------------------------------------------
StarOffice 7 kreativ,
http://213.222.12.204/Default.aspx?tabi ... uctID=3305
Verfasst: Sa, 09.04.2005 16:31
von Fantin
Danke für den Tipp!
Leider wollte ich nur die doppelten leeren Absätze entfernen und nicht alle leeren.
Konkret, die Textdatei besteht aus 180 SMS in folgender Form:
Datum und Uhrzeit: 29.07.2004 11:48:01
Von: 017111223344
Text der SMS
Diese würde ich gerne in folgende Form umwandeln:
Datum und Uhrzeit: 29.07.2004 11:48:01
Von: 017111223344
Text der SMS
Ich entferne also die zwei aufeinanderfolgenden Absätze.
Werden jetzt alle leeren Absätze entfernt werde, so ergeben die 180 SMS einen ellenlangen Text. Dem Absatz zwischen den einzelnen SMS würde ich gerne behalten.
Gibt es keine Variable für Enter die man bei Suchen&Ersetzen eingeben könnte?
Oder hat mir jemand einen anderen Tipp?
Danke, Julius
Verfasst: Sa, 09.04.2005 17:07
von Stephan
Gibt es keine Variable für Enter die man bei Suchen&Ersetzen eingeben könnte?
Was für eine Variable? Der reguläre Ausdruck für Leerabsatz ist: ^$
Das eignet sich nun aber nicht für 2 Leerabsätze, ich sehe so keinen Weg.
Oder hat mir jemand einen anderen Tipp?
Ich habe schnell ein Makro geschrieben, was das macht:
Code: Alles auswählen
Sub Main
Cursor = ThisComponent.Text.createTextCursor()
Cursor.gotoStart (false)
Do
Cursor.gotoEndOfParagraph (TRUE)
absatz = Cursor.String
absatz = Trim(absatz)
if LEN(absatz) = 0 Then
if i=1 then
Cursor.gotoPreviousParagraph (False)
Cursor.gotoStartOfParagraph (False)
Cursor.gotoendofparagraph (false)
Cursor.gotonextparagraph (True)
Cursor.gotoendofparagraph (TRUE)
Cursor.GoRight(1,True)
Cursor.String = ""
i=0
Else
i=1
End if
Else
i=0
end if
ergebnis = Cursor.gotoNextParagraph(false)
loop while ergebnis
End Sub
Gruß
Stephan
Verfasst: Sa, 09.04.2005 18:39
von Fantin
Oh, das ist ja nett! Vielen Dank!
Julius