aus odt datei ein Epub erstellemn

Programmierung unter AOO/LO (StarBasic, Python, Java, ...)

Moderator: Moderatoren

Albert15
***
Beiträge: 62
Registriert: Do, 07.12.2023 16:43
Kontaktdaten:

aus odt datei ein Epub erstellemn

Beitrag von Albert15 »

Ist es überhaupt möglich, aus einer odt Datei ein Epub erstellen?
in chatGPT habe ich gesucht und diese Antwort erhalten.
Ist das ein Ansatz den ich verfolgen sollte?
Albert

Dieses Makro durchsucht alle Fußnoten und setzt deren Absatzvorlage auf „Fußnote“. Der eigentliche Fußnotentext bleibt erhalten.
Sub FussnotenFormatKorrigieren()
Dim oDoc As Object
Dim oFussnoten As Object
Dim oFussnote As Object
Dim oCursor As Object
Dim i As Long

oDoc = ThisComponent
oFussnoten = oDoc.getFootnotes()

For i = 0 To oFussnoten.getCount() - 1
oFussnote = oFussnoten.getByIndex(i)
oCursor = oFussnote.createTextCursor()
oCursor.gotoStart(False)
oCursor.gotoEnd(True)
oCursor.ParaStyleName = "Footnote"
Next i

MsgBox "Alle " & oFussnoten.getCount() & _
" Fußnoten wurden bearbeitet."
Nach oben
Mondblatt24
*******
Beiträge: 1303
Registriert: So, 14.05.2017 16:11

Re: aus odt datei ein Epub erstellemn

Beitrag von Mondblatt24 »

Braucht es dafür überhaupt ein Makro?
Funktioniert das nicht über Datei → Als EPUB exportieren…?
Win 11 (x64) ▪ LibreOffice 26.8.1.1 (x86_64) ▪ AOO Portable 4.1.16
Wurde die Frage zutreffend beantwortet, bitte den Betreff der Eingangsfrage mit [GELÖST] ergänzen. Beschreibung
Antworten