OpenOffice.info

Hallo Thomas,

Wissen ist Macht. Weiß nix - Macht nix.

Natürlich heißt das so ... und nu geh ich mal den Inspektor (be-) suchen. Hab schon immer gesagt, Programmierung ist teilweise Detektivarbeit: "Die Hüte tief im Gesicht" ( wie seinerzeit KRS, die Leute mit dem Hut ?! )

Herzlichen Dank ...
Gruß, Stefan

Hey Stefan,

[quote="Stef1904"]Es müßte doch analog dem "oFeld.content" etwas ähnliches geben wie "oFeld.name" oder so ?![/quote]

Sicher ;-) Nutze einen Inspektor (z.B. XRay) dann hättest du die Lösung schnell selbst gefunden:

oFeld.VariableName

ist der Name der Variablen.

Gruss
Thomas

Sub Textfeldbearbeiten
   oDoc = thiscomponent
   oTxtFelder = oDoc.getTextFields().createEnumeration()
   do while oTxtFelder.hasmoreElements()
      oFeld = oTxtFelder.nextElement
      if oFeld.supportsService("com.sun.star.text.TextField.SetExpression") then
         msgbox oFeld.content
         oFeld.content = "Thomas"
      end if
   loop
   oDoc.getTextFields().refresh()
End Sub

Hallo OO Gemeinde,
in einem Writer-Dokument habe ich mittels "Einfügen->Feldbefehl->Andere->Variablen" mehrere Variablen definiert und in den Text eingefügt.
Per Makro kann ich den [b]Inhalte[/b] der Variablen auslesen und ändern, aber :

Wie kann ich den dazugehörigen [b]Namen[/b] der Variablen herausknobeln ?

Den entspr. Makrotext fand ich hier im Forum :

[code]Sub Textfeldbearbeiten
oDoc = thiscomponent
oTxtFelder = oDoc.getTextFields().createEnumeration()
do while oTxtFelder.hasmoreElements()
oFeld = oTxtFelder.nextElement
if oFeld.supportsService("com.sun.star.text.TextField.SetExpression") then
msgbox oFeld.content
oFeld.content = "Thomas"
end if
loop
oDoc.getTextFields().refresh()
End Sub
[/code]

Es müßte doch analog dem "oFeld.content" etwas ähnliches geben wie "oFeld.name" oder so ?!

Ein allzubekanntes Problem, oder ?

Hören gern + danke,

Stefan