wie kann ich ein in der Kopfzeile mit &[Datum] eingefügtes Datum auf folgendes Format bringen:
Mittwoch, 27. August 2003
Danke im Voraus!
Tim
Sub test()
datum = Format(Date, "dddd, dd.mm.yy")
Worksheets("Tabelle1").PageSetup.LeftHeader = datum
End Sub
Um das Datum in der Kopfzeile von Excel zu formatieren, kannst du die folgende VBA-Prozedur verwenden. Diese Anleitung ist für Excel-Versionen geeignet, die Makros unterstützen.
Öffne Excel und drücke ALT + F11, um den VBA-Editor zu starten.
Klicke auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.
Füge den folgenden Code in das Modul ein:
Sub test()
datum = Format(Date, "dddd, dd.mmmm.yyyy")
Worksheets("Tabelle1").PageSetup.LeftHeader = datum
End Sub
Schließe den VBA-Editor und gehe zurück zu Excel.
Drücke ALT + F8, wähle test aus und klicke auf Ausführen.
Jetzt wird das aktuelle Datum in der Kopfzeile im Format „Mittwoch, 27. August 2003“ angezeigt.
Fehler: Das Datum wird nicht korrekt angezeigt.
Fehler: Die Kopfzeile bleibt leer.
Falls du keine VBA-Makros verwenden möchtest, kannst du das Datum auch direkt in die Kopfzeile einfügen:
Seitenlayout.Kopf- und Fußzeile.Datum.Für eine dynamische Aktualisierung ist die VBA-Methode jedoch empfehlenswerter.
Hier ist ein Beispiel, wie du die Kopfzeile mit dem aktuellen Datum aktualisieren kannst:
Sub UpdateHeaderWithDate()
Dim datum As String
datum = Format(Date, "dddd, dd.mmmm.yyyy")
Worksheets("Tabelle1").PageSetup.LeftHeader = "Aktuelles Datum: " & datum
End Sub
Das Ergebnis wird sein: „Aktuelles Datum: Mittwoch, 27. August 2003“, was in Berichten sehr hilfreich sein kann.
Format(Date, "dd.mm.yy") das Datum kürzen.excel datumsachse formatieren, um die Darstellung der Daten zu optimieren.1. Wie kann ich das Datum in der Fußzeile einfügen?
Du kannst den gleichen VBA-Code verwenden und PageSetup.Footer statt PageSetup.LeftHeader anpassen.
2. Kann ich das Datum umdrehen, also von Tag, Monat, Jahr zu Jahr, Monat, Tag?
Ja, du kannst das Datumsformat im Format-Befehl anpassen. Zum Beispiel: Format(Date, "yyyy-mm-dd") ergibt „2003-08-27“.
3. Gibt es eine Möglichkeit, das Datum automatisch zu aktualisieren?
Ja, du kannst das Makro so einstellen, dass es beim Öffnen der Datei ausgeführt wird, indem du es in das Workbook_Open-Ereignis im „DieseArbeitsmappe“-Modul einfügst.