Code für manuellen Seitenumbruch
Verfasst: Mo, 04.03.2019 15:50
Code für manuellen Seitenumbruch könnte ich gut gebrauchen.
Den würde ich in ein Makro einbinden.
Martin
Den würde ich in ein Makro einbinden.
Martin
deutsches Forum rund um Apache OpenOffice und LibreOffice
http://oooforum.de/
Code: Alles auswählen
Sub insert_PageBreak_at_Position
oViewCursor = thisComponent.CurrentController.ViewCursor
oText = thisComponent.Text
oTextCursor = oText.createTextCursor
oTextCursor.gotoRange(oViewCursor, false)
oTextCursor.BreakType = com.sun.star.style.BreakType.PAGE_AFTER
oTextCursor.gotoEndOfParagraph(false)
oText.insertControlCharacter(oTextCursor, 0,false)
End Sub