Wie kann man mit der Tastatur zwischen den Absätzen wechseln?

8.3.4 Wie kann man mit der Tastatur zwischen den Absätzen wechseln?

Es gibt keinen Tastaturbefehl um zwischen den Absätzen zu springen.

Alternativ kann man diese beiden Makros verwenden und mit einem Tastaturbefehl verknüpfen. Mit diesen Makros springt der Cursor einen Absatz nach oben oder unten und an den Anfang des Absatzes.

sub gotoNextParagraph

Dim myDoc as Object

Dim myViewCursor as Object

Dim myTextCursor as object

myDoc=thisComponent

myViewCursor=myDoc.GetCurrentController.ViewCursor

mytextCursor=mydoc.text.createtextcursor()

mytextCursor.gotoRange(myViewCursor,false)

mytextCursor.gotoNextParagraph(false)

mytextCursor.gotoStartOfParagraph(false)

myViewCursor.gotoRange(myTextCursor,false)

end sub

sub gotoPreviousParagraph