DocumentIndex, Stichwortverzeichnis

[Koto]

Hallo,

ich möchte innerhalb eines Textdokumentes ein Makro zur Erstellung eines Stichwortverzeichnisses schreiben. Es gelingt mir dieses zu Erzeugen und ans Ende des Dokumentes zu setzen, alle Einträge, die ich über Libreoffice ("Einfügen->Verzeichniss->Eintrag") hinzugefügt habe, erscheinen auch. Leider finde ich keinen Weg einen eignen Eintrag hinzuzufügen.

Ich dachte mit "com.sun.star.text.DocumentIndexMark" eine Möglichkeit zu finden. Aber ich finde keinen Zusammenhang zwischen "Index" und "MarkIndex"

Code: Alles auswählen

	
Indexes = ThisComponent.getDocumentIndexes ()
MarkIndex = ThisComponent.createInstance ("com.sun.star.text.DocumentIndexMark")
MarkIndex.setMarkEntry ("Test1")

FOR i = 0 TO Indexes.getCount - 1
	IF Indexes.getByIndex(i).Title = INDEXTITLE THEN 
		Index = Indexes.getByIndex(i)
	END IF
NEXT

Irgendeine Methode von "Index", die den einfachen Eintrag erlaubt, das neue Array sortiert und mit Index.update() darstellt, scheint es nicht zugeben!??

Ich danke schon mal im Vorraus für jede Idee oder Hilfe