Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

WRITER hat alles, was Sie von einer modernen, voll ausgestatteten Textverarbeitung erwarten.
Mau
Beiträge: 304
Registriert: Do 14. Feb 2013, 19:37

Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von Mau » Do 10. Jan 2019, 16:44

Liebe ExpertInnen,
ich muss Absatzumbrüche durch Zeilenumbrüche ersetzen. Wie mache ich das? \n im Ersetzen-Feld setzt ja wieder Absatzumbrüche.

Gruß,
Mau



Benutzeravatar
miesepeter
Beiträge: 988
Registriert: So 19. Dez 2010, 18:16
Wohnort: Bayern

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von miesepeter » Do 10. Jan 2019, 17:03

Benutze AltSearch.oxt.

Mau
Beiträge: 304
Registriert: Do 14. Feb 2013, 19:37

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von Mau » Do 10. Jan 2019, 17:28

Hallo miesepeter,

AltSearch habe ich installiert. Das gibt aber, wenn ich es aufrufe, einen BASIC-Laufzeitfehler aus, vom Typ com.sun.star.container.NoSuchElementExceptionMessage.
Angezeigt wird dazu die Programmzeile 110:
oLibContainer.LoadLibrary(LibName).

Gruß,
Mau

Benutzeravatar
miesepeter
Beiträge: 988
Registriert: So 19. Dez 2010, 18:16
Wohnort: Bayern

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von miesepeter » Do 10. Jan 2019, 18:03

@Mau: Verstehe ich schon, manchmal ist AltSearch.oxt unzuverlässig.
Ich habe jetzt an einem Text probiert, es ergaben sich keine Fehler.
AltSearch.oxt: Version 1.4.2 (neueste Version)
LO: Version 6.1.4.2
OS: LinuxMint 18.3-64 Mate

Mau
Beiträge: 304
Registriert: Do 14. Feb 2013, 19:37

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von Mau » Do 10. Jan 2019, 19:47

Lieber Miesepeter,

ich habe Version 6.1.1 (mit Windows 10 64bit).

Wie macht man den Austausch denn händisch, ohne AltSearch?

Gruß,
Mau

DavidG
Beiträge: 156
Registriert: Do 22. Mär 2018, 21:41

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von DavidG » Do 10. Jan 2019, 22:20

Hallo Mau,

mittels Suchen und Ersetzen funktioniert dies nicht.
Auch unter Verwendung von RegEx geht dies nicht.
Notepad++ kann es, LO ist noch nicht soweit mit der RegEx-Implementierung.

Also, entweder Altsearch oder siehe Beispieldatei mit Makro:
Ersetze Absatzmarke durch Zeilenschaltung.odt
Suchen und Ersetzen mittels Makro
(12.96 KiB) 16-mal heruntergeladen
Durch eine kleine Änderung im Makro-Code, kann das Programm auch so eingesetzt werden, dass
es nicht im gesamten Dokument sucht und ersetzt, sondern nur innerhalb eines markierten Textbereichs.

Manuell wäre nur Absatz für Absatz möglich.
Gruß

David
___________________
WIN 10 PRO
LO 6.1.5.2 64-Bit

Mau
Beiträge: 304
Registriert: Do 14. Feb 2013, 19:37

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von Mau » Do 10. Jan 2019, 22:56

Lieber David,

danke!
Ja, ich bräuchte den Code für einen markierten Teilbereich.
Was müsste ich ergänzen?

Gruß,
Mau

DavidG
Beiträge: 156
Registriert: Do 22. Mär 2018, 21:41

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von DavidG » Do 10. Jan 2019, 23:19

Hallo Mau,
Mau hat geschrieben:Ja, ich bräuchte den Code für einen markierten Teilbereich.
Da war ich wohl etwas zu voreilig.
Im Code ist u.a. diese Zeile auskommentiert:

Code: Alles auswählen

'			' OPTIONAL markierter Bereich
			oSel=oDoc.getCurrentSelection
Das erstellte Object oSel stellt dabei die eigentliche Markierung dar und funktioniert.
Allerdings bietet im Gegensatz zum Objekt oDoc, das Objekt oSel keinen createSearchDescriptor() an.
Das bedeutet, dass man einen anderen Weg finden muss, um innerhalb der Selektion zu arbeiten.

Bin gerade auf der Suche nach einer Umgehung dieses Problems.

Melde mich wieder.
Gruß

David
___________________
WIN 10 PRO
LO 6.1.5.2 64-Bit

musikai
Beiträge: 179
Registriert: Do 14. Mai 2015, 17:53

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von musikai » Fr 11. Jan 2019, 13:39

So geht's auch:

Code: Alles auswählen

Sub convert_para_to_linebreaks_selection
oDoc = ThisComponent
oVC = oDoc.CurrentController.getViewCursor
oText=oVC.Text
oEndCursor=oText.createTextCursorByRange(oVC.End)
oTextCursor=oText.createTextCursorByRange(oVC.Start)

do while oText.compareRegionEnds(oTextCursor,oEndCursor) > 0
oTextCursor.goright(1,true)
if instr(oTextCursor.string,chr(13))>0 then oTextCursor.string=chr(10)
oTextCursor.collapsetoend
loop
End Sub
Anhang mit Schaltfläche "Absatzumbruch->Zeilenumbruch"
Dateianhänge
Absatzumbruch_zu_Zeilenumbruch.odt
(10.94 KiB) 15-mal heruntergeladen
Win7 Pro, Sibelius 7.1.3, Lubuntu 15.10, LibO 4.4.7, OO 4.1.3
Free Project: LibreOffice Songbook Architect (LOSA)
http://struckkai.blogspot.de/2015/04/li ... itect.html

Mau
Beiträge: 304
Registriert: Do 14. Feb 2013, 19:37

Re: Absatzumbrüche (¶) durch Zeilenumbrüche (↵) ersetzen

Beitrag von Mau » Fr 11. Jan 2019, 13:52

Liebe alle,

ich stelle gerade fest, dass AltSearch auf meinen Internet-Rechner problemlos läuft. Windows- und LO-Versionen sind dieselben wie auf dem Arbeitsrechner, der zum Internet keine Verbindung hat.

Gruß,
Mau



Antworten

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 2 Gäste