Datum und User anzeigen lassen
Space
ich würde gerne beim Speichern der Excel Datei den Usernamen und das aktuelle Datum desjenigen, der die Datei gespeichert hat, anzeigen lassen.
Mein Code, den ich in die Arbeitsmappe (im VBA-Editor) integriert habe ist folgender:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Formular").Range("I25") = Now 'Letztes Speicherdatum in _
Zelle I25 anzeigen
Sheets("Formular").Range("I26") = Application.UserName 'Letzten Anwender der abgespeichert hat _
in Zelle I26 anzeigen
End Sub
Danke für eure Hilfe
Gruß
Space