Tips & Tricks 144 – Enter the Last Save Date and Time

1. Open your workbook and ALT+F11
2. Locate your Workbook name in Project Explorer Window
3. Right click on your workbook name > Insert > Module
4. Copy paste the Macro code given
5. Save your file as .xlsm

To get Last Save Date, enter following in a cell
=LastSaveDate()

To get Last Save Time, enter following in a cell
=LastSaveTime()

To get Last Save Date & Time Both, enter following in a cell
=LastSaveDateTime()

Note – You will have to format your result cells appropriately in Date / Time / Timestamp format

< Download the workbook illustrating the same Last Saved Date Time >

Function LastSaveDate()
    Application.Volatile
    LastSaveDate = DateValue(FileDateTime(ThisWorkbook.FullName))
End Function

Function LastSaveTime()
    Application.Volatile
    LastSaveTime = TimeValue(FileDateTime(ThisWorkbook.FullName))
End Function

Function LastSaveDateTime()
    Application.Volatile
    LastSaveDateTime = FileDateTime(ThisWorkbook.FullName)
End Function