VBA では、FileDateTime 関数を使ってファイルの作成日時または最終変更日時を取得することができます。ここでは、サンプルコードを掲載しています。
スポンサーリンク
サンプルコード
VBA でファイルの最終更新日時を取得するサンプルコードになります。
Dim mTime As Date mTime = FileDateTime("E:\folder\file.txt") MsgBox Format(mTime, "YYYY/MM/DD HH:mm:ss")
実行結果
上記の実行結果は以下のようになります。
なお、ファイルパスが無効であったり、ファイルが存在しない場合は例外が発生します。パラメータにワイルドカード付のパスを指定して複数のファイルの最終更新日時をリストで取得するようなことはできません。
例外の種類 | エラー番号 | 条件 |
---|---|---|
ArgumentException | 52 | PathName が無効です。またはワイルドカードを含んでいます。 |
FileNotFoundException | 53 | 対象のファイルが存在しません。 |