Ausdruckdatum in der Tabelle mit anzeigen

[Misterlion]

Hallo,
ich habe alles durchsucht, aber nichts über das Ausdruckdatum gefunden.
Könnte mir jemand helfen.

Wenn ich meine Tabelle ausgedruckt habe, möchte ich das Ausdruckdatum in einer Zelle übernehmen.
Ich finde aber leider keinen Befehl dafür.

Aussehen sollte es so:
1. 12.06.2015 oder
2. 12.06.2015 12:34

Gruß
Misterlion

[clag]

Hallo Misterlion

mit einem kleinen Makro das verknüpft ist mit dem Ereignis Dokument drucken ist den Wunsch schon erfüllt.
(ich würde das Makro im Dokument speichern und das Anpassen ebenso nur für das Dokument vornehmen )

Menü > Extras > Anpassen > Ereignisse > Dokument drucken >> Makro zuweisen

Code: Alles auswählen

Sub LogPrint
	oCalc = ThisComponent
	oSheet = oCalc.Sheets(0)
	PrintLog = oSheet.GetCellRangeByName("C3")
	PrintLog.String = Now()
End Sub

hilft dir das?

[komma4]

Willkommen im Forum.

Es gibt leider keine eingebaute Calc-Funktion dafür.

Speichere folgenden Code in einer STANDARD Bibliothek (Deiner Installation, oder in den Dokumenten, welche die Funktion nutzen sollen)

Code: Alles auswählen

FUNCTION DRUCKDATUM
' 20150714 
' de66025 
' benutzerdefinierte CALC-Funktion zum Setzen des Druckdatums

aPrintDate = ThisComponent.getDocumentProperties().PrintDate

IF aPrintDate.Year > 0 THEN
   DRUCKDATUM = _
      FORMAT(aPrintDate.Day, "00") & "." & _
      FORMAT(aPrintDate.Month, "00") & "." & _
      aPrintDate.Year & " " & _
      FORMAT(aPrintDate.Hours, "00") & ":" & _
      FORMAT(aPrintDate.Minutes, "00")  
ELSE
   DRUCKDATUM = "Dokument wurde noch nicht gedruckt"
END IF 

END FUNCTION

Mit =Druckdatum() in einer Zelle wird diese Funktion aufgerufen, liesst die Dateieigenschaften aus und füllt die Zelle.

Hilft das weiter?

[Misterlion]

Hallo Winfried,

die Funktion wäre klasse.
Aber leider weis ich nicht, wie man diesen Code jetzt in OpenOffice Calc Bibliothek oder in dem Dokument speichert.
Habe ich noch nie gemacht und schon gar nicht in Calc.
Die Functionen kenne ich, durch Access Programmierung, habe das aber auch noch nie bei Excel angewendet.
Könntest du mir diese beiden Arten der Speicherung einmal zeigen, wie ich diesen Code jetzt ablegen muss und wo.

Danke für deine Unterstützung
Frank

[komma4]

F1 > Calc > Suchen: benutzerdefinierte funktionen
oder
OOo Wiki - Makros installieren