2016-02-11 85 views
1

有没有可以删除Excel文件的VBA代码?VBA:如何删除文件?

任何帮助或例子将受到欢迎。

+1

什么bin?回收站? [到斌](http://www.cpearson.com/excel/recycle.aspx) – Davesexcel

+0

我相信如此。我不完全懂英文。但是我想自动扔掉各种文件,以便在我清空垃圾箱时删除它们。 – Studix

+2

请参阅我以前的帖子中的链接。 – Davesexcel

回答

2

这是我使用的东西。很干净,有效:

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确实将文件发送到回收站。它会永久删除文件。

+0

谢谢。解决了它。 – Studix

+0

@Studix不客气。如果答案有效,请提供答案。 –