在excel中获取文件夹的创建时间

Question

如何在Excel中创建文件夹的时间？

我知道

FileDateTime(FileOrFoldername)

可以追溯一段时间，但这是＆＃34;创建或最后修改日期＆＃34 ;;还

Set oFS = CreateObject("Scripting.FileSystemObject")
FileCreatedAt = oFS.GetFile(PathWithFilename).DateCreated

可以检索文件创建时间，但这对文件夹不起作用。

Answer 1

使用以下子获取文件夹创建的日期和时间

Sub DirDate()
Dim fso As New Scripting.FileSystemObject
Dim fld As Scripting.Folder
    Set fld = fso.GetFolder("c:\windows")
    MsgBox fld.DateCreated
End Sub

  

您必须在引用中激活Microsoft Scripting Runtime。见下面的截图。

Answer 2

这可以帮到你：

Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.GetFolder(PathName)
ShowDateCreated = f.DateCreated

https://msdn.microsoft.com/en-us/library/1c87day3(v=vs.84).aspx