Seite 1 von 1
tastur Code einfügen
Verfasst: Mi, 05.05.2021 11:32
von martin11
Anhängend schicke ich drei Makros.
Wie füge ich darin den jeweiligen Code für nächste, vorherige, letzte Seite ein?
Die musste ich umbenennen, weil immer noch nicht bas geladen wird.
Martin
Re: tastur Code einfügen
Verfasst: Mi, 05.05.2021 19:50
von Stephan
Sofern es um die 3 Makros geht, so müssen diese beispielsweise lauten:
Code: Alles auswählen
Sub LetzteSeitenZahlErmitteln
oDocW = ThisComponent
oCC = oDocW.CurrentController
oVC = oCC.getViewCursor
oVC.jumpToLastPage()
Msgbox oVC.getPage
End sub
REM Das Programm führt einen Cursorsprung durch.
REM Der Cursor springt von der aktuellen Seite,
REM direkt in die erste Zeile der nächsten Seite
Sub SpringeAufNaechsteSeite
oDocC = thisComponent
oVC = oDocC.GetCurrentController.ViewCursor
With oVC
.jumpToNextPage(false)
.jumpToStartOfPage(false)
End With
End Sub
REM Das Programm führt einen Cursorsprung durch.
REM Der Cursor springt von der aktuellen Seite,
REM direkt in die erste Zeile der vorherigen Seite
Sub SpringeAufVorherigenSeite
oDocC = thisComponent
oVC = oDocC.GetCurrentController.ViewCursor
With oVC
.jumpToPreviousPage(false)
.jumpToStartOfPage(false)
End With
End Sub
Die musste ich umbenennen, weil immer noch nicht bas geladen wird.
ich weiß leider nicht was das meint.
Gruß
Stephan
Re: tastur Code einfügen
Verfasst: Do, 06.05.2021 12:34
von Karolus
Hallo
Stephan hat geschrieben:ich weiß leider nicht was das meint.
vmtl. das umbenennen von
….bas auf
….dot