Re: [de-users] Writer: Suche nach Feldern

Hallo Boris, und wer es sonst noch brauchen kann,

ich habe mal schnell das folgende Makro geschrieben:

Sub ListTextFields

dim enum as object, elem as object, elemMaster as object, s as string

enum = ThisComponent.TextFields.createEnumeration
do while enum.hasMoreElements
    elem = enum.nextElement
    s = s & elem.CurrentPresentation
    elemMaster = elem.TextFieldMaster
    s = s & " : " & elemMaster.DataBasename & "." & 
elemMaster.DataTableName & "." & elemMaster.DataColumnName & CHR(10)
loop
msgbox s,,"All Textfields"

End Sub

Ich bin nicht ganz sicher, ob das passt, weil ich die Datei mit 
Textfeldern, an der ich das getestet habe, nicht mit der 
Serienbrief-Funktion verarbeitet, sondern per Makro; und die Daten 
stehen bei mir in einer Datenbank, aber Calc kann ja genauso als 
Datenquelle dienen.
Das Makro musst du ausführen, wenn du direkt vorher in deinem 
Serienbrief-Dokument warst, damit es auch das richtige Dokument 
verarbeitet. Wie du das makro speicherst und einsetzt, setze ich erst 
einmal voraus und beschreibe das nur, wenn du danch fragen solltest.
Das Makro gibt eine Liste in einer Messagebox aus. Da die bei dir sehr 
groß ist, klickst du am besten in den Text in der Box und drückst 
Strg+A, dann kannst du das wie üblich mit Strg+C in die Zwischenablage 
kopieren und irgendwo anders weiter verarbeiten.

Wenn da was nicht passt, müsste ich noch einmal näher einsteigen.

Viele Grüße
Gerhard

Am 14.03.2021 um 13:22 schrieb Michael Höhne:
> Hallo Boris,
>
> > hier habe ich einen Serienbrief mit mehreren hundert Feldern. Die s
> > speisende Tabelle (Calc) enthält noch einige mehr, und ich möchte bei
> > einigen von ihnen herausfinden, an welcher Stelle diese im
> > Writer-Dokument verwendet werden.
> Wie Daniel schon schrieb: Die Felder werden ja mit dem Inhalt der
> Tabelle befüllt.
>   
> > Wie macht man es richtig?
> In solchen Fällen füge ich einen Dummy-Datensatz in die Tabelle ein!
> Dann erzeuge ich einen Test-Serienbrief mit exakt diesem Dummy-Eintrag.
>
> In meine Adressdatenbank gibt es z.B. eine Adresse:
>
> Sir Anton Nonym
> Keine Str. 123
> 54321 Nirgendwo
> Neverland
>
> Gruß,
> Michael


--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy