[de-users] Calc: Makro-Laufzeitfehler

Hallo,
um das Speicherdatum automatisiert in eine Zelle zu bekommen, habe ich
folgendes Makro (nicht von mir, sondern gefunden gekriegt) in mein
Calc-Dokument eingebaut:

> REM  *****  BASIC  *****
>
> Function ChangedOn() As Date
>
>       Dim oSheet As Object
>       Dim ChgDate As Variant
>       
>       oSheet = ThisComponent()
>       
>       ChgDate = oSheet.DocumentProperties.ModificationDate
>
> '     ChgDate ist leer, wenn das Dokument noch nie gespeichert wurde. In diesem Fall CreationDate 
> nutzen
>
>       If ChgDate.Year = 0 Then
>               ChgDate = oSheet.DocumentProperties.CreationDate
>       End If
>       
>       ChangedOn = DateSerial(ChgDate.Year, ChgDate.Month, ChgDate.Day)
>       
> End Function

Dieses Makro nutze ich, indem ich es in der gewünschten Zelle mit
=CHANGEDON()
aufrufe.


Beim Öffnen des Tabellendokuments begegnet mir die Meldung:

> BASIC-Laufzeitfehler.
> Eigenschaft oder Methode nicht gefunden: DocumentProperties.

Nach manuellem Aktualisieren mit [Strg]+[Shift]+[F9] ist allerdings das
Speicherdatum in der Zelle korrekt. Für die Funktion scheint es nicht
direkt schädlich zu sein, aber es stört natürlich, wenn man erst einmal
zwei Fenster (die Meldung und das Makro-Fenster) schließen muss, bevor
man arbeiten kann, und es macht keinen guten Eindruck, wenn man die
Tabelle weiterreicht.

Was bedeutet diese Meldung?
Wie lässt sich das abstellen?




-- 
Mit freundlichem Gruß                                 Best regards
                           Boris Kirkorowicz

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