Im Rahmen der Einrichtung eines Arbeitsblatts möchten Sie möglicherweise, dass die Kopf- oder Fußzeile das Datum enthält, an dem die Arbeitsmappe zuletzt bearbeitet wurde. Excel verwaltet diese Informationen nicht, ermöglicht es Ihnen jedoch, Makros auszuführen, wenn bestimmte Ereignisse auftreten, z. B. Änderungen an einer Arbeitsmappe. Sie müssen dem ThisWorkbook-Objekt im VBA-Editor lediglich ein Makro wie das folgende hinzufügen:

Private Sub Workbook_SheetChange(ByVal _   Sh As Object, ByVal Target As Excel.Range)

ActiveSheet.PageSetup.CenterFooter = _       "Worksheet Last Changed: " & _       Format(Now, "mmmm d, yyyy hh:mm")

End Sub

Das Makro führt dazu, dass jede Fußzeile in jedem Arbeitsblatt in der Arbeitsmappe separate Datums- und Uhrzeitangaben enthält, da jedes Arbeitsblatt zu unterschiedlichen Zeiten aktualisiert wird. Sie können die Zieleigenschaft (.CenterFooter) nach Bedarf in eine der anderen Kopf- oder Fußzeileneigenschaften (.LeftHeader, .CenterHeader, .RightHeader, .LeftFooter, .RightFooter) ändern.

Möglicherweise möchten Sie, dass die Kopf- oder Fußzeile stattdessen das Datum enthält, an dem die Arbeitsmappe zuletzt gespeichert wurde. (Dies ist, was viele Leute wirklich als „Datum der letzten Bearbeitung“ ansehen.) Die Informationen werden im Dialogfeld Eigenschaften für ein Arbeitsblatt angezeigt, aber Excel verfügt über keine Menüauswahl oder einen anderen Befehl, mit dem Sie dieses Datum in eine Kopfzeile oder einfügen können Fusszeile. Stattdessen müssen Sie ein Makro verwenden, um die gewünschten Informationen hinzuzufügen.

Der beste Weg, um die Aufgabe zu erfüllen, besteht darin, dem ThisWorkbook-Objekt ein Makro hinzuzufügen, das unmittelbar vor dem Speichern einer Arbeitsmappe ausgelöst wird:

Private Sub Workbook_BeforeSave(ByVal _   SaveAsUI As Boolean, Cancel As Boolean)

Dim sht     For Each sht In Sheets         sht.PageSetup.CenterFooter = _           "Workbook Last Saved: " & _           Format(Now, "mmmm d, yyyy hh:mm")

Next End Sub

Dieses Makro durchläuft jedes Arbeitsblatt in der Arbeitsmappe und ändert jede mittlere Fußzeile so, dass das Datum angegeben wird, an dem die Arbeitsmappe gespeichert wurde.

ExcelTips ist Ihre Quelle für kostengünstige Microsoft Excel-Schulungen.

Dieser Tipp (3352) gilt für Microsoft Excel 97, 2000, 2002 und 2003. Eine Version dieses Tipps für die Multifunktionsleistenschnittstelle von Excel (Excel 2007 und höher) finden Sie hier:

Datum der letzten Bearbeitung.