OpenOffice.info

Verfasst: **Di, 19.07.2011 12:41**

Hallo Experten,

in eine Textmarke möchte ich aus einer Inputbox einen Text einfügen.

Ein Eingabefeld (Feldbefehl/Funktion) kommt nicht in Frage , weil dieses gleich nach dem Start ausgefüllt werden muß, ich aber erstmal aus einer Datenbank einige andere Textmarken füllen muß, um daraus die Info für diese Textmarke zu bekommen.

sub main
oDoc = thisComponent
strUserfield = "Ort"
'inputbox .......
strContent = "Hintertupfingen"
oTextFieldMasters = oDoc.TextFieldMasters
TxtUserfield = "com.sun.star.text.FieldMaster.User."+StrUserfield
oTextFieldMasters.getByName(TxtUserfield).content = StrContent ' hier Fehlermeldung
end sub

dieses Makro-Fragment produziert die Fehlermeldung.

gruß
sven-my

Suchfunktion funktioniert wieder mal nicht
und
http://www.google.de/search?hl=de&q=Tex ... btnG=Suche
brachte auch keine Ergebnisse für mich

Hallo Moderatoren: bitte verschieben in die Abteilung für Makros - hab' mich vertan

Verfasst: **Di, 19.07.2011 22:50**

Aloha

Code: Alles auswählen

"com.sun.star.text.FieldMaster.User."+StrUserfield

probier mal stattdessen

Code: Alles auswählen

"com.sun.star.text.fieldmaster.User."+StrUserfield

Die ".getByName"-Methode ist generell Case-Sensitive.

Verfasst: **Mi, 20.07.2011 07:29**

Hallo,

hat leider nicht den gewünschten Erfolg - gleiche Meldung, wie zuvor.

gruß
sven-my

Verfasst: **Mi, 20.07.2011 09:13**

sven-my hat geschrieben:in eine Textmarke möchte ich aus einer Inputbox einen Text einfügen.

Du sprichst ein benutzerdefiniertes Feld an!

Textmarkeninhalte (durch Einfügen>Textmarke... zuvor gekennzeichnete Inhalte) werden mit folgendem Code neu besetzt

Code: Alles auswählen

oBM = oDok.getBookmarks().getByName( StrUserfield )
oBM.getAnchor().String = StrContent

War es das?

Verfasst: **Mi, 20.07.2011 09:31**

Hallo Komma4,

jetzt habe ich das Fragment so ausprobiert:

Sub Main
oDoc = thisComponent
strUserfield = "Ort"
'inputbox ....... nach strContent
strContent = "Hintertupfingen"
oBM = oDok.getBookmarks().getByName(StrUserfield) 'hier Fehlermeldung
oBM.getAnchor().String = StrContent
End Sub

und da kommt dann diese Fehlermeldung

Verfasst: **Mi, 20.07.2011 09:57**

Hallo sven-my,

oDoc = thisComponent
oBM = oDok.getBookmarks().getByName(StrUserfield) 'hier Fehlermeldung

Na? Fällt dir was auf?
Hast Du auch die Textmarke 'Ort' in deiner Datei? Bei mir funzt es.

Gruß
balu

Verfasst: **Mi, 20.07.2011 10:15**

Hallo Balu,

jetzt, wo Du mich mit der Nase drauf stubst, fällt auch mir der Unterschied auf.

Jetzt klappt es auch bei mir.

Herzlichen dank an alle Helfer !

gruß
sven-my

OpenOffice.info

Text in Textmarke (Bookmark) [gelöst]

Text in Textmarke (Bookmark) [gelöst]

Re: Text in Textmarke (Bookmark)

Re: Text in Textmarke (Bookmark)

Re: Text in Textmarke (Bookmark)

Re: Text in Textmarke (Bookmark)

Re: Text in Textmarke (Bookmark)

Re: Text in Textmarke (Bookmark)