OpenOffice.info

Sub Reset_DatacolumnName
    oTFE = thisComponent.TextFields.createEnumeration
    while oTFE.hasMoreElements
        oTF = oTFE.nextElement
        if oTF.SupportsService("com.sun.star.text.TextField.Database") then
            sDCName = oTF.TextFieldMaster.DataColumnName
            oTF.CurrentPresentation = "<" & sDCName & ">"
        endif
    wend
End Sub

Moin,
ich sehe zwar wenig Nutzen darin, aber wenn es dir so wichtig ist, kannst du angehängtes Makro einmal über das Writer Dokument laufen lassen, dann siehst du die Spaltennamen wieder.
[code]Sub Reset_DatacolumnName
oTFE = thisComponent.TextFields.createEnumeration
while oTFE.hasMoreElements
oTF = oTFE.nextElement
if oTF.SupportsService("com.sun.star.text.TextField.Database") then
sDCName = oTF.TextFieldMaster.DataColumnName
oTF.CurrentPresentation = "<" & sDCName & ">"
endif
wend
End Sub[/code]
Gruß R

Hallo flex18,

eine Alternative zu Stephans Vorschlag ist, einfach über "Daten in Felder" Werte einzufügen.

[quote]In den Einstellungen gibt es den Reiter Hyperlink da steht der Name drin[/quote]

ich verstehe nicht wo das sein soll, also wie Du einen Reiter namens "Hyperlink" aufrufst/anzeigst
[quote]
Kann ich irgendwie den Namen des Feldbefehls kleiner machen?[/quote]

Die Anzeige des Feldbefehls entspricht, solange noch keine Werte eingefügt sind, dem Namen der Spalte, ändere also den Namen der Spalte direkt in der Datentabelle in der Datenbank. z.B. Siehe "Erstellung von Tabellen" in: https://wiki.documentfoundation.org/images/9/90/Base_03_Tabellen_V61.pdf


Gruß
Stephan