Wie kann ich in Excel das Datum der letzten Änderung einfügen?

Question

Ich möchte gerne in einem Excel Dokument das DAtum der letzeten Änderung automatisch in einer Zelle anzeigen lassen. Kann mir jemand sagen, ob und wie das geht?

female_daywalker · Accepted Answer

Will mich nicht mit fremden Federn schmücken: hier ist es genau erklärt: http://www.herber.de/forum/archiv/288to292/t291112.htm

Anonym · Answer

1. Es geht
2. Und zwar so:
Klick auf "Extra" --> "Makro" --> "Visual Basic Editor"
Im linken Navigationsfenster "Diese Arbeitsmappe" doppelklicken. In das Arbeitsfenster rechts dann folgenden Text eingeben:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
Application.EnableEvents = False
Sh.Range("A1").Value = Date
Application.EnableEvents = True
End Sub

Speichern, zurück ins Arbeitsblatt und eine beliebige Zelle verändern und schwupps, ploppt in der Zelle A1 das Datum auf.
Wenn eine andere Zelle gewünscht wird, einfach oben nach Sh.Range eine andere Zelle angeben.

BarbieQ · Answer

Erstell dir ein Macro mit folgenden Inhalt:

Dim zeit ' Variable defenieren
    Range("D10").Select ' die Zelle in der es erscheinen soll
    zeit = FileDateTime("test.xls") 'die "Datei.xls um die es geht
    ActiveCell.FormulaR1C1 = zeit 'die Zeit einfügen
End Sub

Wie kann ich in Excel das Datum der letzten Änderung einfügen?

3 Antworten