Hallo zusammen!
Zerbreche mir den Kopf darüber, wie ich in eine Zelle das Speicherdatum der Datai anzeigen lassen kann.
Bitte helft mir!
Jetzt schon mal danke
Hallo Silke!
Mach einen rechtsklick auf das Excelsymbol in der Menüleiste links neben "Datei",
wähle "Code anzeigen" und kopiere diesen Code in das rechte Fenster.
' ********************************************************************** ' Modul: DieseArbeitsmappe Typ: Element der Mappe(Sheet, Workbook, ...) ' **********************************************************************
OptionExplicit
PrivateSub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel AsBoolean) Me.Sheets("Tabelle1").Range("A1") = "Zuletzt gespeichert am " & Format(Now, "dd.mm.yy u\m hh:mm") EndSub
Den Tabellennamen und die Zelladresse musst du an deine Gegebenheiten anpassen.
Dann wird beim Speichern der Eintrag vorgenommen.