VBA中刪除文件的步驟

Kill 文件路徑名

文件路徑名明確一個(gè)或多個(gè)你要?jiǎng)h除的文件的名稱，隨你意，也可以將驅(qū)動(dòng)器和文件夾名稱包括在里面。你可以在文件路徑名參數(shù)里使用通配符（*或?）來確?？焖賱h除文件。你不能刪除開啟的文件。

如果你是跟著前面的練習(xí)一步一步過來的，那么你的硬盤上應(yīng)該有了文件夾C:\Abort和好幾個(gè)文件了里面了。在下面的練習(xí)里，你將首先刪除文件夾Abort里面的所有文件，然后再刪除文件夾本身：

1. 在當(dāng)前工程里插入新模塊，并重命名為KillStatement

Sub RemoveMe()
Dim folder As String
Dim myFile As String
‘a(chǎn)ssign the name of folder to the folder variable
‘notice the ending backslash "\"
folder = "C:\Abort\"
myFile = Dir(folder, vbNormal)
Do While myFile <> ""
Kill folder & myFile
myFile = Dir
Loop
RmDir folder
End Sub