tastur Code einfügen

[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

[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

[Karolus]

Hallo

ich weiß leider nicht was das meint.

vmtl. das umbenennen von ….bas auf ….dot