[de-users] Datumsformat in Fußzeile (was:Re: [de-users] Re: Makro wird nicht mehr ausgeführt)

2022-12-03 Diskussionsfäden Franklin Schiftan 

Zu der Möglichkeit, das Datum in der Fußzeile auch zu formatieren,
existiert bereits seit 2015 ein entsprechender Eintrag im Bugtracker:



Nachdem das bislang aber nur vier Leute interessierte, hat da wohl auch
keiner einen dringenden Handlungsbedarf abgeleitet.

Ich habe dort jetzt als fünfter meinen Kommentar eingetragen.

Wer ebenfalls meint, dass eine Formatierung des Datums in der Fußzeile
wünschenswert wäre, kann ja dort ebenfalls einen Kommentar hinterlassen
... vielleicht tut sich ja dann irgendwann doch noch was ...

Zwei Fragen hab ich aber noch dazu:

1. Aufgrund welcher Kriterien formatiert LibO das Datum in der Fußzeile?
(Dass es dies unterschiedlich macht, sieht man ja auch am
Bug-Ersteller.) Ist es die [vermutete] Location? Oder die eingestellte
Sprache? Oder...?

2. Warum nimmt LibO nicht einfach das systemweit eingestellte
Datumsformat? (Vermutlich hat es ja einen Grund, dass dort nicht das
lokale, sondern das internationale Datumsformat nach ISO eingestellt ist.)

  und tschüss

Franklin





Am 2022-11-27 um 16:41 schrieb Werner Tietz:

Hallo Da hast du leider* recht, LO lässt an der Stelle nur den
Feldbefehl Datum zu, ohne die Möglichkeit der Formatierung.

Am 27. November 2022 14:08:03 MEZ schrieb Franklin Schiftan
:

Am 2022-11-27 um 10:58 schrieb Werner Tietz:

Hallo Da stellt sich nur die Frage: Wieso dieses
Makro-geschwurbel anstelle einer entsprechend eingerichteten
Dokumentvorlage???


Kannst Du mir bitte sagen, wie ich diesen Effekt (insbesondere das
Datumsformat) mit einer Vorlage realisieren kann?

 und tschüss

Franklin








--
Liebe Grüße
Franklin


--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Franklin Schiftan 

Am 2022-11-27 um 15:39 schrieb Gerhard Weydt:

Hallo Franklin,

Am 27.11.2022 um 14:35 schrieb Franklin Schiftan:

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?

[Ergänzung]
Wenn ich im Dialog ankreuze, dass der gleiche Inhalt auch auf der ersten
Seite erscheinen soll, klappt es wie gewünscht.

Welcher Befehl muss also im Makro ergänzt werden, um diese Option
darüber auch einzuschalten?

      oSeitenFormat.firstPageFooterIsShared = TRUE


Prima, danke! Funktioniert mit der vorstehenden Zeile! Die nachstehende
war ja eh schon drin.


      oSeitenFormat.FooterIsShared = TRUE

Gruß
Gerhard



, 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(), "-mm-dd"))

oSeitenFormat.rightPageFooterContent = oFT

End Sub






--
Liebe Grüße
Franklin







--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Werner Tietz 
Hallo
Da hast du leider* recht, LO lässt an der Stelle nur den Feldbefehl Datum zu, 
ohne die Möglichkeit der Formatierung.

Am 27. November 2022 14:08:03 MEZ schrieb Franklin Schiftan 
:
>Am 2022-11-27 um 10:58 schrieb Werner Tietz:
>> Hallo Da stellt sich nur die Frage: Wieso dieses Makro-geschwurbel
>> anstelle einer entsprechend eingerichteten Dokumentvorlage???
>
>Kannst Du mir bitte sagen, wie ich diesen Effekt (insbesondere das
>Datumsformat) mit einer Vorlage realisieren kann?
>
>  und tschüss
>
>Franklin
>
>
>
>
>-- 
>Liste abmelden mit E-Mail an: users+unsubscr...@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

-- 
¢{°°}p

-- 
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Gerhard Weydt 

Hallo Franklin,

Am 27.11.2022 um 14:35 schrieb Franklin Schiftan:

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?

[Ergänzung]
Wenn ich im Dialog ankreuze, dass der gleiche Inhalt auch auf der ersten
Seite erscheinen soll, klappt es wie gewünscht.

Welcher Befehl muss also im Makro ergänzt werden, um diese Option
darüber auch einzuschalten?

    oSeitenFormat.firstPageFooterIsShared = TRUE
    oSeitenFormat.FooterIsShared = TRUE

Gruß
Gerhard



, 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(), "-mm-dd"))

oSeitenFormat.rightPageFooterContent = oFT

End Sub






--
Liebe Grüße
Franklin





--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Franklin Schiftan 

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?

[Ergänzung]
Wenn ich im Dialog ankreuze, dass der gleiche Inhalt auch auf der ersten
Seite erscheinen soll, klappt es wie gewünscht.

Welcher Befehl muss also im Makro ergänzt werden, um diese Option
darüber auch einzuschalten?


, 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(), "-mm-dd"))

oSeitenFormat.rightPageFooterContent = oFT

End Sub






--
Liebe Grüße
Franklin


--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Franklin Schiftan 

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(), "-mm-dd"))

oSeitenFormat.rightPageFooterContent = oFT

End Sub






--
Liebe Grüße
Franklin


--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Franklin Schiftan 

Am 2022-11-27 um 13:54 schrieb Gerhard Weydt:

Hallo Franklin,

bei mir läuft das Makro einwandfrei in 7.4.3.2.


Danke fürs Testen!


Am Code fehlt also nichts. Liegt es vielleicht daran, dass du
RightPageFooterContent setzt?


Nö. Hatte bislang auch immer einwandfrei funktioniert ...


Wenn du da in Format > Seitenvorlage > Fußzeile > Bearbeiten gehst,
musst du auf den Reiter "Fußzeile (weitere)", um den Eintrag zu
sehen.


O.k., danke für den Hinweis, dort sehe ich den Eintrag auch wie
gewünscht drin stehen 


Oder die Druckvorschau verwenden.


... nur in der Druckvorschau und im Ausdruck leider nicht.

Wodran könnte das wohl liegen?


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(), "-mm-dd"))

oSeitenFormat.rightPageFooterContent = oFT

End Sub





--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Franklin Schiftan 

Am 2022-11-27 um 10:58 schrieb Werner Tietz:

Hallo Da stellt sich nur die Frage: Wieso dieses Makro-geschwurbel
anstelle einer entsprechend eingerichteten Dokumentvorlage???


Kannst Du mir bitte sagen, wie ich diesen Effekt (insbesondere das
Datumsformat) mit einer Vorlage realisieren kann?

  und tschüss

Franklin




--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden 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)", um den Eintrag zu sehen. Oder die 
Druckvorschau verwenden.


Gruß
Gerhard

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(), "-mm-dd"))

oSeitenFormat.rightPageFooterContent = oFT

End Sub 



--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Werner Tietz 
Hallo
Da stellt sich nur die Frage: Wieso dieses Makro-geschwurbel anstelle einer 
entsprechend eingerichteten Dokumentvorlage???
-- 
¢{°°}p

-- 
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Franklin Schiftan 

Am 2022-11-27 um 09:22 schrieb Robert Großkopf:

Hallo Franklin,


Basic Laufzeitfehler Eigenschaft oder Methode nicht gefunden:
supportsService.

Die auslösende Zeile im Makro, die auf Empfehlung eines
Listenteilnehmers eingefügt wurde und mit der erreicht werden
sollte, dass das Makro nur bei Calc-Dokumenten zur Ausführung
kommt, lautet:

IF NOT ThisComponent.supportsService (
"com.sun.star.sheet.SpreadsheetDocument" ) then exit Sub


Vermutlich versuchst Du, das Makro direkt aus dem Editor zu starten.
Da gibt es supportsService erst einmal nicht.


Wie gesagt kam diese Fehlermeldung beim LibO-Neustart.


Du musst schon irgendein Dokument geöffnet haben. Bei mir
funktioniert das jedenfalls unter LO 7.4.3.2


O.k., danke fürs Testen ... dennoch wird der gesamte Code auch bei
geöffnetem Calc-Document, insbesondere die Einfügung des formatierten
Datums in die Fusszeile, so nicht mehr ausgeführt:

*x- - - - - - - - - - - - - > Schnipp < - - - - - - - - - - - -x*

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(), "-mm-dd"))

oSeitenFormat.rightPageFooterContent = oFT

End Sub

*x- - - - - - - - - - - - - > Schnapp < - - - - - - - - - - - -x*


Robert

  und tschüss

Franklin



--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-27 Diskussionsfäden Robert Großkopf 

Hallo Franklin,


Basic Laufzeitfehler
Eigenschaft oder Methode nicht gefunden: supportsService.

Die auslösende Zeile im Makro, die auf Empfehlung eines
Listenteilnehmers eingefügt wurde und mit der erreicht werden sollte,
dass das Makro nur bei Calc-Dokumenten zur Ausführung kommt, lautet:

IF NOT ThisComponent.supportsService (
"com.sun.star.sheet.SpreadsheetDocument" ) then exit Sub


Vermutlich versuchst Du, das Makro direkt aus dem Editor zu starten. Da 
gibt es supportsService erst einmal nicht. Du musst schon irgendein 
Dokument geöffnet haben. Bei mir funktioniert das jedenfalls unter LO 
7.4.3.2


Gruß

Robert
--
Homepage: https://www.familiegrosskopf.de/robert


--
Liste abmelden mit E-Mail an: users+unsubscr...@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

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

2022-11-26 Diskussionsfäden Franklin Schiftan 

So, nach einem Absturz und dem anschließenden Neustart von LibO wird mir
jetzt für das fragliche Makro folgendes angezeigt:

Basic Laufzeitfehler
Eigenschaft oder Methode nicht gefunden: supportsService.

Die auslösende Zeile im Makro, die auf Empfehlung eines
Listenteilnehmers eingefügt wurde und mit der erreicht werden sollte,
dass das Makro nur bei Calc-Dokumenten zur Ausführung kommt, lautet:

IF NOT ThisComponent.supportsService (
"com.sun.star.sheet.SpreadsheetDocument" ) then exit Sub

(alles in einer Zeile)

Wie muss diese Zeile geändert werden, um jetzt nicht mehr einen Fehler
auszulösen, aber das Gewünschte zu erreichen?

Besten Dank ...

  und tschüss

Franklin





Am 2022-11-27 um 08:21 schrieb Franklin Schiftan:

Hallo miteinander,

kann es sein, dass in der neuesten LibO-Version

(Version: 7.4.3.2 (x64) / LibreOffice Community
Build ID: 1048a8393ae2eeec98dff31b5c133c5f1d08b890
CPU threads: 8; OS: Windows 10.0 Build 19044; UI render: Skia/Raster;
VCL: win
Locale: de-DE (de_DE); UI: de-DE
Calc: threaded

Makros, die in 'meine Makros' gespeichert sind und bislang immer bei den
zugewiesenen Ereignissen problemlos ausgeführt wurden, jetzt nicht mehr
ausgeführt werden?

(Bei Bedarf kann ich auch den Makro-Code posten - ich glaube aber nicht,
dass es an ihm liegt.)

Übrigens passiert auch bei der manuellen Ausführung des Makros nicht
das, was bislang immer passierte.

Hat jemand zielführende Hinweise, wie ich den Code zur erfolgreichen
Ausführung bringen kann?



--
Liste abmelden mit E-Mail an: users+unsubscr...@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