Wie kann das Datums- oder Datums- / Uhrzeitformat in der Kopf- oder Fußzeile angegeben werden?
Normalerweise, wenn Sie Datum oder Uhrzeit in die Kopf- oder Fußzeile mit dem einfügen &[Datum] or &[Zeit] Code, das Datums- oder Uhrzeitformat basiert auf den von Windows gesteuerten regionalen Einstellungen. Wie können Sie in diesem Fall das Datums- oder Datums- / Uhrzeitformat in Kopf- oder Fußzeile nach Ihren Wünschen ändern, wie im folgenden Screenshot gezeigt?
Geben Sie das Datums- oder Datums- / Uhrzeitformat in der Kopf- oder Fußzeile mit VBA-Code an
Geben Sie das Datums- oder Datums- / Uhrzeitformat in der Kopf- oder Fußzeile mit VBA-Code an
Hier werde ich Ihnen einen einfachen VBA-Code vorstellen, mit dem Sie diese Aufgabe in Excel lösen können. Gehen Sie dazu wie folgt vor:
1. Aktivieren Sie Ihr Arbeitsblatt, in das Sie das Datum einfügen und in Kopf- oder Fußzeile formatieren möchten, und klicken Sie dann auf Seitenlayout Klicken Sie auf die Schaltfläche in der unteren rechten Ecke der Arbeitsmappe, um die Seitenlayoutansicht zu aktivieren. Siehe Screenshot:
2. Halten Sie die Taste gedrückt ALT + F11 Tasten in Excel, um die zu öffnen Microsoft Visual Basic für Applikationen Fenster.
3. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Datum in Kopf- oder Fußzeile einfügen und formatieren:
Sub add_date_header()
ActiveSheet.PageSetup.CenterHeader = Format(Date, "mmmm dd, yyyy")
End Sub
Note: Im obigen Code können Sie die ändern CenterHeader zu Linke Kopfzeile, CenterFußzeile… Und das Datumsformat mmmm tt, jjjj kann auch nach Bedarf geändert werden.
4. Und dann drücken F5 Schlüssel, um diesen Code auszuführen, und Ihr angegebenes Datumsformat wurde sofort in die Kopf- oder Fußzeile eingefügt. Siehe Screenshot:
Tips: Wenn Sie Ihr eigenes Datums- und Uhrzeitformat in die Kopf- oder Fußzeile einfügen möchten, wenden Sie den folgenden Code an:
Sub Change_Format()
ActiveSheet.PageSetup.CenterHeader = Format(Now, "MMMM DD, YYYY HH:MM:SS")
End Sub
Und Sie erhalten folgendes Ergebnis:
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!