Hallo Boris,
Funktioniert das auch in Writer?
ich denke schon: In einem WRITER-Dokument;
* Einfügen > Feldbefehl > Autor
* Mit diesem Makro ...
Sub DisplayFields '*QUELLE: https://pitonyak.org/OOME_3_0.pdf:
Listing 385*
oEnum = ThisComponent.getTextFields().createEnumeration()
Do While oEnum.hasMoreElements()
oField = oEnum.nextElement()
s = s & oField.getPresentation(True) & " = "
'Field type
If oField.supportsService("com.sun.star.text.TextField.Annotation") Then
REM More cryptic, I could use If oField.getPresentation(True) =
"Note"...
REM A "Note" has no displayed content so calling getPresentation(False)
REM returns an empty string. Instead, obtain the author and the content.
s = s & oField.Author & " says " & oField.Content
Else
s = s & oField.getPresentation(False)
'String content
End If
s = s & CHR$(13)
Loop
MsgBox s, 0, "Text Fields"
End Sub
* ... wird das angezeigt:
Dokumentinfo:Erstellt = MeinName
Das Makro habe ich mir mal angesehen: das könnte ich nicht einmal
unfallfrei abtippen.
Ich würde das (in CALC) zunächst so reduzieren, dass nur der QR-Code
(und nicht die anderen Codes erzeugt werden.
Gruß
Michael
--
Liste abmelden mit E-Mail an: [email protected]
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
