excel - 获取文件excel的最后修改日期

Question

我想获取我需要在 Excel 的 A 列中输入的给定文件列表的最后修改日期。我怎样才能解决这个问题 ？对于每个文件，我想获取最后修改日期。不幸的是，我在 VBA 方面没有太多技能。

Answer 1

这很容易!您可以申请FileDateTime ( file_path ) .如果您在 A 列中有文件补丁和名称列表，并且此宏将在 B 列中返回文件创建或上次修改的日期和时间。

Sub LastFileDateTime()
CNT = Range("A65536").End(xlUp).Row
For i = 1 To CNT
    Cells(i, "B").Value = FileDateTime(Cells(i, "A"))
    'FileDateTime("D:\QueryTable.xlsm")
Next
End Sub