【書式】
File.DateLastModified
ファイルが最後に更新されたときの日付と時刻を返します。
返り値は文字列です。
Sub test59()
Dim FSO As Object
Set FSO = CreateObject("Scripting.FileSystemObject")
''C:\Work\Book1.xlsが最後に更新された日時を表示します
MsgBox FSO.GetFile("C:\Work\Book1.xlsx").DateLastModified
Set FSO = Nothing
End Sub