Makro Username und Zeitstempel
WA
ich sitze da an einem Problem und finde auch keine Lösung!
Ich möchte ganz einfach, sobald die Excel-Datei geschlossen wird, in einer bestimmten Zelle den Usernamen und die Zeit eingefügt werden, sodass man beim öffnen der Datei jederzeit nachvollziehen kann, wer zuletzt die Datei in Bearbeitung hatte.
Der Eintrag sollte auf einem Tabellenblatt "Übersicht" erscheinen und immer weitergezählt bzw. eingetragen werden.
Hier mal das Makro mit dem ich arbeiten wollte, aber es klappt nicht?
Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
Zeile = Target.Row
Cells(Zeile, 7) = Application.UserName
Termin = DateSerial(Year(Date), Month(Date), Day(Date))
Cells(Zeile, 8) = Termin
Application.ScreenUpdating = True
End Sub
Danke für die Hilfe im voraus