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