Von |
BeetBetty |
Am |
15. November 2008 um 15:27:39 |
Frage |
Hi Leute,
hoffe ihr könnt mir weiterhelfen - Habe folgendes Problem :
Nach jedem Ausdruck eines Word - Dokuments möchte ich in der Dateiinfo (Dokument - Rechte Maustaste - Dateiinfo) das Druckdatum eintragen.
Habe mir bereits folgenden Codeschnipsel zusammengestellt:
sub test() Dim Datum As String Datum = Day(Now) & "." & Month(Now) & "." & Year(Now) & "_" & Hour(Now) & "." & Minute(Now)
ThisDocument.BuiltInDocumentProperties("Comments").Value = "Gedruckt worden am " & Datum ThisDocument.Save end sub
Allerdings funkioniert das Ganze nur sporadisch. In die Dateiinfo wird nicht immer das aktuelle Datum / Wert eingetragen.
Des weiteren möchte ich die Dateiinfo nur dann ändern wenn gedruckt wurde. Wie kann ich ermitteln wann gedruckt wurde bzw. der Druck auch wirklich abgesetzt wurde ?
Vielen Dank im voraus !
Grüsse |
|