ich habe eine riesige Excel Datei in der ich auf dem ersten Blatt "Letzte änderung durch...am...."stehen haben möchte....
Wie mache ich das? So, dass ich immer sehen kann, wer die Datei wann das letzte Mal geändert hat.
Danke,
Sabine
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("Tabelle1").Range("A1") = Environ("Username")
Worksheets("Tabelle1").Range("A2") = Now
End Sub
Mit einem Rechtsklick auf einen Tabellenreiter -> Code anzeigen gelangst du in die VBA Umgebung. Suche dann links im Projektexplorer in deinem VBA-Projekt "DieseArbeitsmappe". Mache einen Doppelklick darauf und kopiere den Code in das rechte (obere) Codefenster.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen