vba - VBA を使用してテキスト ファイルのタイムスタンプを確認する方法

Question

Excel 2003 VBA (Windows XP) でコードを記述して、外部の TXT ファイルのタイムスタンプが異なるかどうかを確認しようとしているので、変更された場合は「インポート」できます。

私を救うことができるVBAの関数はありますか?

Answer 1

変更日が必要だと思います。はいの場合は、これを参照してください

Debug.Print FileDateTime("C:\Sample.txt")

表示される日付と時刻の形式は、システムのロケール設定に基づいています。

編集

使用するFileSystemObject

Option Explicit

Sub Sample()
    Dim oFS As Object
    Dim sFile As String

    sFile = "C:\MyFile.txt"

    Set oFS = CreateObject("Scripting.FileSystemObject")

    '~~> Created Date
    Debug.Print "Created Date : "; oFS.GetFile(sFile).DateCreated

    '~~> Modified Date
    Debug.Print "Modified Date : "; oFS.GetFile(sFile).Datelastmodified

    Set oFS = Nothing
End Sub