Access-o-Mania

Office-Forum (Deutsch/German) => Microsoft Excel => Thema gestartet von: JLK am März 10, 2011, 07:53:25

Titel: Excel: automatisch Speicherdatum in Kopfzeile
Beitrag von: JLK am März 10, 2011, 07:53:25
Hallo!

ich habe einen Code finden können, der das Speicherdatum automatisch in die Kopfzeile eintragen soll:

Sub SpeiDatInKopfz()
Application.ScreenUpdating = False
SpeiDat = ActiveWorkbook.BuiltinDocumentProperties("Last save time").Value
With ActiveSheet.PageSetup
.LeftHeader = ""
.CenterHeader = "Speierdatum/Uhrzeit: " & SpeiDat
.RightHeader = ""
End With
Application.ScreenUpdating = True
End Sub


Ich habe leider keine Ahnung, wo und wie man den Code in der Excel-Datei unterbringt, damit beim Speichern der Datei das Datum eingetragen wird. Über eine kurze Erklärung, wie man das macht, würde ich mich freuen.

Vielen Dank
mfg
JLK
Titel: Re: Excel: automatisch Speicherdatum in Kopfzeile
Beitrag von: JLK am März 11, 2011, 08:39:55
Zur Ergänzung: ich kann den Code in eine Schaltfläche packen, draufklicken und schon steht das Datum im Seitenkopf. Ich hätte die Funktion aber gerne auf das Ereignis "Speichern" gelegt. Ich habe aber keine Ahnung, wo man das definiert.

Gruss
JLK