Einfügen des zuletzt gespeicherten Datums in eine Zelle (Microsoft Excel)
Kimberly fragt sich, ob es eine Formel gibt, mit der sie das Datum, an dem die Arbeitsmappe zuletzt gespeichert wurde, in eine Zelle einfügen kann. Selbst wenn sie die Arbeitsmappe jeden Tag öffnet, möchte sie nur, dass das Datum jedes Mal aktualisiert wird, wenn sie sich zum Speichern entscheidet.
Es gibt keine Formel dafür; Excel verfügt nicht über die native Funktion. Sie können jedoch ein einfaches Makro erstellen, das beim Speichern der Arbeitsmappe einen Datumswert in eine Zelle einfügt. Dies basiert auf dem BeforeSave-Ereignis, das zum ThisWorkbook-Objekt gehört:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _ Cancel As Boolean) Sheets(1).Range("A1").Value = Now() End Sub
Dieses Makro platziert das Datum (tatsächlich den von der Now-Funktion zurückgegebenen Wert) in Zelle A1 des ersten Arbeitsblatts in der Arbeitsmappe. Diese Zelle sollte in Excel in das gewünschte Format formatiert werden. Dieses Makro hat einen möglichen Nachteil: Wenn Sie Speichern unter (um die Arbeitsmappe unter einem anderen Namen zu speichern) verwenden und dann das Speichern abbrechen, wird das Datum weiterhin aktualisiert, da es vor dem Speichern stattgefunden hat. Dies bedeutet, dass es stattgefunden hat Gerade als Excel mit dem Speichern der Arbeitsmappe begann, nicht nachdem die Arbeitsmappe tatsächlich gespeichert wurde.
Es ist zu beachten, dass Excel auch ein AfterSave-Ereignis enthält, mit dem Sie möglicherweise versucht sind, Informationen zu aktualisieren. Leider weist es auch einige Lücken auf und bietet nichts narrensichereres als das BeforeSave-Ereignis.
Wenn Sie möchten, können Sie einen etwas anderen makrobasierten Ansatz verwenden.
Dieser basiert auf einem regulären Makro, nicht auf einem Ereignishandler:
Function LastModified() As Date Application.Volatile LastModified = ThisWorkbook.BuiltinDocumentProperties("Last Save Time") End Function
In jeder Zelle, in der das Datum angezeigt werden soll, rufen Sie das Makro folgendermaßen auf:
=LastModified()
Die Formel gibt das Datum und die Uhrzeit zurück, zu der die Arbeitsmappe zuletzt gespeichert wurde, und Sie können sie beliebig formatieren. Da die Funktion als flüchtig eingestuft wird, wird sie bei jeder Neuberechnung des Arbeitsblatts kontinuierlich aktualisiert.
_Hinweis: _
Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der ExcelTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.
ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.
Dieser Tipp (13575) gilt für Microsoft Excel 2007, 2010, 2013, 2016, 2019 und Excel in Office 365.