Um mit Basic einen neuen Text als Autotext hinzuzufügen muß dieser erst markiert und
dann
in den AutotextContainer eingefügt werden.
Genau wie beim
Aufruf
von Autotexten muss man daran denken das der eigentliche
Name des
Autotextes das Kürzel ist.
Es ist sinnvoll vorher zu prüfen ob es den Namen schon gibt.Dies erfolgt mit hasbyname.
MyObjekt = createunoservice("com.sun.star.text.AutoTextContainer")
odoc=thiscomponent
otext=odoc.text
ocursor=otext.createtextcursor()
ocursor.goright(20,true)
oBereich=MyObjekt.getByName("standard")
if oBereich.hasbyname("NEU") =false
then
oBereich.insertNewbyname("NEU","Titel",ocursor)
end if