Wann zuletzt ausgedruckt

Bild

Betrifft: Wann zuletzt ausgedruckt
von: Bernd
Geschrieben am: 07.07.2008 14:55:07

Hallo zusammen,
ich möchte in einer Zelle darstellen, wann die Tabell zuletzt ausgedruckt wurde. In den Eigenschaften gibt es diese Information anscheinend. Kann ich über eine public function darauf zugreifen?
Sollte es eine Formel geben, wäre das natürlich noch besser.
Herzlichen Dank für jeden Tip
Bernd

Bild

Betrifft: AW: Wann zuletzt ausgedruckt
von: Klaus M.vdT.
Geschrieben am: 07.07.2008 15:42:32
Hi Bernd,
darfs ein wenig VBA sein?
In "diese Arbeitsmappe":


Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheets("Tabelle1").Range("A1") = Date & " " & Time
End Sub


Grüße,
Klaus M.vdT.

Bild

Betrifft: AW: Wann zuletzt ausgedruckt
von: Reinhard
Geschrieben am: 07.07.2008 15:49:28
Hi Bernd,


Function Druckdatum()
Druckdatum = ThisWorkbook.BuiltinDocumentProperties("Last print date")
End Function


Gruß
Reinhard

Bild

Betrifft: AW: Wann zuletzt ausgedruckt
von: Ludicla
Geschrieben am: 07.07.2008 16:04:45
Hey Bernd
sieh Dir mal die Seite an.
http://www.kmbuss.de/Excel-CD/udf.htm
Gruss Ludicla.

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Wann zuletzt ausgedruckt"