wollte Fragen, wie ich einer Zelle den Befehl gebe, dass sie mir das Datum der letzten Speicherung anzeigt.
Danke an alle die mir weiter helfen!!!
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Exit Sub
Range("A1") = "Geänd. von " & _
Application.UserName & _
" am " & _
Format(Date, "dd.mm.yy")
' ActiveWorkbook.Save
End Sub
Sub Speicherdatum()
MsgBox "Letzte Aktualisierung " & _
ThisWorkbook.BuiltinDocumentProperties(12)
End Sub