VBA 从文本文件的属性中获取日期

我正在尝试获取特定文本文件上传到计算机上的日期。日期不在实际的文本文件中，您必须右键单击然后转到属性以查看日期。我需要将日期读入一个变量。

我不知道从哪里开始尝试完成这项工作。

谢谢，

杰西·斯莫瑟蒙

最佳答案

如果内置的 FileDateTime() 不是您可以使用的 FSO:

Dim FSO As Object: Set FSO = CreateObject("Scripting.FileSystemObject")
Dim objFile As Object: Set objFile = FSO.Getfile("C:\bleep\bloop.file")

Debug.Print "Date created: " & objFile.DateCreated
Debug.Print "Date last accessed: " & objFile.DateLastAccessed
Debug.Print "Date last modified: " & objFile.DateLastModified

如果它是扩展属性中的日期，请检查 this。

关于VBA 从文本文件的属性中获取日期，我们在Stack Overflow上找到一个类似的问题：https://stackoverflow.com/questions/5970191/