Insert current date into header

This tutorial shows how to insert the current date into a header in a specific sheet using Excel and VBA

EXCEL METHOD 1. Insert current date into header

EXCEL

Select sheet > Insert tab > Text group > Header & Footer > Select header area > Design tab > Header & Footer Elements group > Current Date > Click anywhere on the sheet
1. Select the sheet in which you want to insert the current date in the header.
Note: In this example we have selected Sheet1. 		Select sheet
2. Select the Insert tab. Select Insert tab
3. Select the Text group.
4. Click on Header & Footer. 		Select the Text group and click on Header & Footer
5. Select the header area in which you want to show the current date.
Note: In this example we have selected the center header area. 		Select header area
6. Select the Design tab.
7. Click on Current Date in the Header & Footer Elements group. 		Select Design tab and click Current Date in Header & Footer Elements group
8. This will insert &[Date] in the selected header area which will return the current date.
9. Click anywhere on the sheet. 		Insert Current Date into header

VBA METHOD 1. Insert current date into header using VBA

VBA

Sub Insert_current_date_header()
'declare a variable

Dim ws As Worksheet

Set ws = Worksheets("Sheet1")
With ws.PageSetup

.CenterHeader = "&D"

End With

End Sub

NOTES
Note 1: This VBA code will insert the current date into the center header area of "Sheet1".

RELATED TOPICS
Related Topic Description Related Topic and Description
Insert a header How to insert a header
Insert a footer How to insert a footer in a specific sheet
Insert page numbers into header How to insert page numbers into a header in a specific sheet
Insert current date into footer How to insert the current date into a footer in a specific sheet