VBA ファイルの更新日時の取得

Sub Test1() '参照設定追加　Microsoft Script Runtime

Dim fso As FileSystemObject
Set fso = New FileSystemObject ' インスタンス化

Dim f As File
Set f = fso.GetFile("フルパス") ' ファイルを取得

Dim d As Date

d = f.DateLastModified ' 更新日時を取得
Debug.Print (d)

' 後始末
Set fso = Nothing

End Sub