Re: [de-users] Re: Makro wird nicht mehr ausgeführt

Am 2022-11-27 um 13:54 schrieb Gerhard Weydt:
> Hallo Franklin,
>
> bei mir läuft das Makro einwandfrei in 7.4.3.2. Am Code fehlt also
> nichts. Liegt es vielleicht daran, dass du RightPageFooterContent
> setzt? Wenn du da in Format > Seitenvorlage > Fußzeile > Bearbeiten
> gehst, musst du auf den Reiter "Fußzeile (weitere)"

Ergänzend zu meiner anderen Antwort stellt sich mir die Frage, warum es
nicht auch unter 'Fußzeile (erste)' so erscheint ... möglicherweise
würde es dann ja auch in der Druckvorschau und im Ausdruck wieder
erscheinen....

[kurze Zeit später]
Ich habe testweise mal eine zweite Seite erzeugt - und siehe da, dort
erscheint der Eintrag wie gewünscht.

Die Frage muss nun also lauten: Was muss ggf. im Makro geändert werden,
damit das Datum nicht nur auf den weiteren, sondern auch auf der ersten
Seite erscheint?

> , um den Eintrag zu sehen. Oder die Druckvorschau verwenden.
>
> Gruß Gerhard

 .... und tschüss

            Franklin




> Am 27.11.2022 um 09:56 schrieb Franklin Schiftan:
> > REM  ***** BASIC  *****
> >
> > Sub FusszeileSetzen
> >
> > IF NOT ThisComponent.supportsService (
> > "com.sun.star.sheet.SpreadsheetDocument" ) then exit Sub
> >
> > DIM OFormatFamilien as Object, oSeitenFormate as Object DIM
> > oSeitenFormat as Object, oFT as Object, oText as Object
> >
> > oFormatFamilien = ThisComponent.StyleFamilies oSeitenFormate =
> > oFormatFamilien.getByName("PageStyles") oSeitenFormat =
> > oSeitenFormate.getByName("Default") oSeitenFormat.FooterIsOn = True
> > oSeitenFormat.FooterIsShared = true  'beide Seiten sind gleich oFT
> > = oSeitenFormat.rightPageFooterContent  'FooterText Objekt
> >
> > '    oText = oFT.CenterText    'Mittleres Textobjekt oText =
> > oFT.RightText     'Rechtes Textobjekt
> >
> > oText.setstring(format( now(), "yyyy-mm-dd"))
> >
> > oSeitenFormat.rightPageFooterContent = oFT
> >
> > End Sub


--
Liebe Grüße
Franklin


--
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