vba - 删除未更新的文件

Question

有谁知道是否可以删除某个时间未更新的文档。我正在尝试在每天晚上 12:01 AM 重新填写一张空白检查表，如果没有人输入当天的检查信息，则删除当天的表格，这样我就不会保存多余的空白检查表。

Answer 1

对的，这是可能的。这是基本代码。您需要更改 if 语句以反映正确的时间段。

Dim oFileObj
Set oFileObj = Wscript.CreateObject("WScript.FileSystemObject")
oFileObj.GetFile("File.Name")  
if oFileObj.DateLastModified < NOW then
    oFileObj.DeleteFile("File.Name")
end if
Set oFileObj = Nothing