Recording the last saved date of an external file in a cell

[Mickey Mouse]

Within a cell on a spreadsheet I want to record the last saved (or modified)
date of another (non Excel) file.

Example - I have a Powerpoint presentation that was last saved on 01/09/03.
I want cell A1 of an Excel file to display "01/09/03" and update when the
Powerpoint file is subsequently saved. Is this possible?

The excel file will be opened regularly, so some form of Autpen macro or
VBA code that updates cell A1 will be perfect.

Thanks in advance for any help!

 

[Mickey Mouse]

Perfect! Thanks

? filedatetime("c:\Briefing Aug 03a.ppt")
8/6/2003 2:36:23 PM

so
Private Sub Workbook_Open()
With ThisWorkbook.Worksheets("Sheet1").Range("A1")
.Value = _
filedatetime("c:\Briefing Aug 03a.ppt")
.NumberFormat = "mm/dd/yyyy"
End With

End Sub

Regards,
Tom Ogilvy