Re: [de-users] Calc: Makro-Laufzeitfehler

Hallo,

Am 03.06.21 um 16:24 schrieb Thomas Krumbein:
> Hei Boris,
>
> bau mal ne wait() Funktion ins Makro ein. Benutzerdefinierte Funktionen 
> werden sehr früh aufgelöst, kann sein, dass manche Dokumentobjekte zu 
> dem Zeitpunkt noch nicht verfügbar sind.
>
> Ich würde mal mit   wait(1000)  nach der Zeile    oSheet = 
> ThisComponent()  beginnen und austesten, evt. dann den Wert reduzieren.

Danke, habe ich gemacht.
Leider ohne Erfolg: die Fehlermeldung erscheint weiterhin, und das Datum
wird wie bisher zunächst auf den 31.12.1899 gesetzt und erst nach
[Strg]+[Shift]+[F9] auf das letzte Speicherdatum. Neu ist jetzt, dass
nach dem Drücken der Tastenkombination für die unbedingte Neuberechnung
etwa eine Sekunde vergeht, bis auf das Speicherdatum gewechselt wird.


> Am 03.06.2021 um 14:14 schrieb Boris Kirkorowicz:
> > 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