SwXTextDocument

[dennisr39]

Ich versuche ein Macro zu schreiben.
Das Macro soll alle Absätze des SwXTextDocument durchlaufen.
Wie fange ich an?
Wie bekommt man das geöffnete SwXTextDocument?

[craig]

Hallo,

hier eine Liste von Dokumentationen:
https://de.openoffice.info/viewtopic.php?t=1553

Für den Anfang ist diese Seite sehr interessant.
http://www.dannenhoefer.de/faqstarbasic/index.html
speziell der Text- und Viewcursor dürfte Dich interessieren:
https://www.dannenhoefer.de/faqstarbasi ... l#Zweig255

Installiere Dir auch unbedingt das XRAY-Tool, man kann damit seinen Code hervorragend inspezieren, usw.
Es handelt sich dabei um ein Writer-Dokument inkl. deutschsprachige Doku und Makros zu Installation und Deinstallation.
https://wiki.openoffice.org/wiki/DE/Mak ... X-Ray_tool
Auf der selben Seite findest Du auch die Konventionen zum benennen von Variablen.

Code: Alles auswählen

Dim oDoc as Object
' Referenzierung einer Objektvariablen und setzen des Zeigers auf das aktuelle Dokument.
' Damit beinhaltet die Objektvariable alle Eigenschaften, Methoden, usw. 
' welche in >ThisComponent< enthalten sind.
oDoc=ThisComponent	' das vordergründige Dokument: z.B. WRITER

REM Inspektion mittels XRAY
xray oDoc

Print oDoc.Title

[F3K Total]

Moin,
anbei ein einfaches Beispiel.

Gruß R