VBA：如何删除文件？

Question

是否有可以删除Excel文件的VBA代码？

欢迎任何帮助或示例。

Answer 1

这是我使用的东西。非常干净有效：

Sub DeleteTEMPIMPORTWorkbook()

    Dim MyDir As String, fn As String
    MyDir = CreateObject("WScript.Shell").SpecialFolders("MyDocuments") & "\My Files" ' Change this to the directory where the file you need to delete is located.

    On Error Resume Next
    Kill MyDir & "\TEMPIMPORT.xlsx"
    On Error GoTo 0

End Sub

请注意，使用Kill NOT 会将文件发送到回收站。它将永久删除该文件。