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 Workbook Information
|Kutools for Excel's Insert Workbook Information utility can quickly insert sheet name, path, user name and
so on to a cell, header or footer.
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:
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.
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 120 handy functions, makes your jobs easier.|
After installing Kutools for Excel, please do as below:(Free Download Kutools for Excel Now!)
Click Enterprise > 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.
Insert Blank Rows & Columns(insert multiple blank rows/columns at once, or insert blank rows/columns every nth row/col...)
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
To post as a guest, your comment is unpublished.· 2 years agoThanks for the Info.
To post as a guest, your comment is unpublished.· 4 years agoperfect.very useful
To post as a guest, your comment is unpublished.· 4 years agoI 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.
To post as a guest, your comment is unpublished.· 4 years ago@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.
To post as a guest, your comment is unpublished.· 5 years agoI tried this technique but could only get it to show up on one sheet. Help?
To post as a guest, your comment is unpublished.· 5 years agoThanks! 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!