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
aus odt datei ein Epub erstellemn
Moderator: Moderatoren
-
Mondblatt24
- *******
- Beiträge: 1303
- Registriert: So, 14.05.2017 16:11
Re: aus odt datei ein Epub erstellemn
Braucht es dafür überhaupt ein Makro?
Funktioniert das nicht über Datei → Als EPUB exportieren…?
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
Wurde die Frage zutreffend beantwortet, bitte den Betreff der Eingangsfrage mit [GELÖST] ergänzen. Beschreibung