VBA宏，用于验证是否已创建新文件或是否已将其添加到文件夹中

我不确定这里是否已经问过这个问题。我找了很多（！）没有找到答案

我想在VBA中创建一个宏，每天检查特定文件夹中是否添加了任何新文件

我看过一些代码来检查文件是否存在（给定名称），但我真的很难找到问题的答案

---

有人能帮我吗？

考虑使用文件系统对象

Sub LookForNew()
    Dim n As String, msg As String, d As Date
    msg = ""
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set fils = fso.GetFolder("C:\TestFolder").Files
    For Each fil In fils
        n = fil.Name
        d = fil.DateCreated
        If d >= Date - 1 Then
            msg = msg & n & vbTab & d & vbCrLf
        End If
    Next fil
    If msg = "" Then
        MsgBox "No new files"
    Else
        MsgBox msg
    End If
    Set fso = Nothing
End Sub

---

循环浏览该文件夹中的文件并检查其创建日期？