Date and time a file was last saved

[plwhittington]

I have two excel files that are open. File #1 has macros and gets data from file #2. The path of the files may change, but they will always be open when the macro is executed. Also, File #2 is an extract from another system.

I would like for the macro to be able to return the date and time file #2 was last updated/saved in a message box. Any suggestions on how to return the date and time stamp would be appreciated.

 

[GTO]

I don't know how you have wb#2 referenced, but you could try built in properties:

Sub exa3()
    MsgBox ThisWorkBook.BuiltinDocumentProperties(12)
End Sub

 

[plwhittington]

that returns the date and time for File #1, which is running the macro, but even after having the code select file #2, it still returns date and time for file #1.

Windows("File2.xls").Activate
MsgBox ThisWorkbook.BuiltinDocumentProperties(12)

The code above is in a macro in File1.

 

[GTO]

'ThisWorkbook' is the default name for the workbook the code is in. To refer to the other wb, something like:

MsgBox Workbooks("File2.xls").BuiltinDocumentProperties(12)

 

[plwhittington]

Thanks GTO- works great.

 

[GTO]

Happy to help and glad that worked