How to insert last modified date in Excel header or footer?
In Excel, we can quickly and easily insert the workbook information, such as file name, file full path, current date and so on into the header or footer. But have you ever tried to insert last modified date and time of the worksheet into them? Excel doesn’t provide this feature for us to insert the last modified date in header or footer, and here, I will introduce you a handy way to solve it.
Insert last modified date in Excel header or footer with VBA code
The following simple VBA code can help you to insert last saved date and time of the worksheet in to the header or footer, please do as this:
1. Activate your worksheet that you want to insert the last modified date into the header or footer.
2. Then hold down the ALT + F11 keys to open the Microsoft Visual Basic for Applications window.
3. In the left VBAProject pane, double click ThisWorkbook to open the Module, then copy and paste the following code.
VBA code: Insert last modified date in header or footer
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = "Last saved: " & Format(Date, "mm-dd-yy") & " " & Time
End Sub
4. Then save and close this code, and go to click View > Page Layout to view the result. And you can see the last modified date and time has been inserted into the center header. See screenshots:
Notes:
1. The last modified date and time is updated automatically, when you modify and save the Excel file.
2. If you need to insert this last saved date and time into the left header/footer, right header/footer or center footer, you just need to change the CenterHeader in the above code to your request.
Insert last modified date/created date/userto header/footer with Kutools for Excel
With Kutools for Excel, you can uset the Insert Workbook Information tool to quickly insert the workbook information to header, footer, or a cell.
Kutools for Excel,with more than 300 handy functions, makes your jobs more easier.
Click Kutools Plus > Workbook ＞Insert Workbook Information, and in the popping dialog, check the information you want to insert , and go to Insert at section, check Range, Header or Footer option, and specify to insert at left header/footer, center header/footer or right header/footer to meet your need.
Kutools for Excel Solves Most of Your Problems, and Increases Your Productivity by 80%
Reuse: Quickly insert complex formulas, charts and anything that you have used before; Encrypt Cells with password; Create Mailing List and send emails...
Super Formula Bar (easily edit multiple lines of text and formula); Reading Layout (easily read and edit large numbers of cells); Paste to Filtered Range...
Select Duplicate or Unique Rows; Select Blank Rows (all cells are empty); Super Find and Fuzzy Find in Many Workbooks; Random Select...
Exact Copy Multiple Cells without changing formula reference; Auto Create References to Multiple Sheets; Insert Bullets, Check Boxes and more...
Extract Text, Add Text, Remove by Position, Remove Space; Create and Print Paging Subtotals; Convert Between Cells Content and Comments...
Super Filter (save and apply filter schemes to other sheets); Advanced Sort by month/week/day, frequency and more; Special Filter by bold, italic...
Combine Workbooks and WorkSheets; Merge Tables based on key columns; Split Data into Multiple Sheets; Batch Convert xls, xlsx and PDF...
More than 300 powerful features. Supports Office/Excel
2007-2019 and 365. Supports all languages. Easy deploying in your enterprise or organization. Full features
30-day free trial. 60-day money back guarantee.
Just tried it after moving the center header to the left footer. Didn't work. What I saved at 1:20 pm still recorded as 1:00 pm. Your help would be most appreciated. BTW, my spreadsheet was created as Excel 2007, and I made changes at the library on Excel 2016. Generally, I can go back and forth between versions with no problems.
Also, I didn't realize my name would be published. Any chance of changing it to Nancy E.?
Many thanks!
I did this and it works. I saved the file as .xlsx and closed it. Now, when I open it, I open the VBA coding window but I am not able to find this chunk of code to edit it. I would like to play with location and remove time. Thank you.
@John R. When you get to the VBA coding window, on the left section of the screen you need to double-click "ThisWorkbook" to open the right section of the screen. Then in the right section (at the top) you need to select "Workbook" and "BeforeSave". That should hopefully show you the chunk of code that you're looking for.
Thanks! I maintain an employee phone number and extension list. People get hired, quit, move to different extensions. If someone wants a copy I print it off, but it only showed the date and time it was printed -- not necessarily the most current information. It was difficult to tell if you had two different copies which one was the most up-to-date. Showing the last time the file was saved will do what I wanted!
