Die Suche ergab 2 Treffer

von riesentrolli
Fr, 17.06.2011 19:31
Forum: Makros und allgemeine Programmierung
Thema: supportsService nicht gefunden
Antworten: 5
Zugriffe: 554

Re: supportsService nicht gefunden

Aloha

Hol dir das Modification_Date nicht per Calcfunktion, sondern schreibe das Änderungsdatum per Sub zB. beim/vorm Schliessen des Dokuments in die gewünschte Zelle.
Entweder das, oder Du packst die Funktion in das Dokument selber - dann kann das Evaluieren erst erfolgen, wenn das Dokument ...
von riesentrolli
Fr, 17.06.2011 18:37
Forum: Makros und allgemeine Programmierung
Thema: supportsService nicht gefunden
Antworten: 5
Zugriffe: 554

supportsService nicht gefunden

Ahoi,

ich habe unter Calc folgendes Makro eingebaut:

Function CalcDoc_Modification_Date()
sTemp = "n/a"

oDoc = thisComponent
If IsNull( oDoc ) THEN
CalcDoc_Modification_Date() = sTemp
msgbox "oDoc null"
Exit Function
End If

If IsEmpty( oDoc ) THEN
CalcDoc_Modification_Date() = sTemp ...