
FileオブジェクトとFolderオブジェクトのDateLastModifiedプロパティについてです。
DateLastModifiedプロパティ
概要
指定したファイルやフォルダーの最後に変更した日時を返します。読み取り専用です。
構文
ファイルの場合:FileObject.DateLastModified
フォルダの場合:FolderObject.DateLastModified
VBAサンプル
フォルダーの最終変更日時の取得
1 2 3 4 5 6 7 8 9 10 11 12 | Sub testファイル() 'Objectの宣言とオブジェクト変数にFileSystemObjectをセット Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") 'FolderオブジェクトをFileSystemObjectのGetFolderメソッドで返して、folにセット Dim fol As Folder Set fol = fso.GetFolder("D:\sample") 'FolderオブジェクトのDateLastAccessedプロパティで取得 Debug.Print fol.DateLastModified End Sub |
ファイルの最終変更日時の取得
1 2 3 4 5 6 7 8 9 10 11 12 | Sub testファイル() 'Objectの宣言とオブジェクト変数にFileSystemObjectセット Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") 'fileオブジェクトをFileSystemObjectのGetFileメソッドで返して、オブジェ変数fにセット Dim f As File Set f = fso.GetFile("D:\sample\test.xlsx") 'FileオブジェクトのDateLastModifiedプロパティで取得 Debug.Print f.DateLastModified End Sub |