2012-05-30 4 views

答えて

10

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

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 
+0

はい、それは解決策です、ありがとうございます:) – MrB

+0

@Bojan、解答としてマークしてください。 – Reafidy

関連する問題