vba - 删除压缩文件

Question

有没有使用 Excel VBA 删除 zip 文件？
我试过使用 Kill folderName & "\*.*"但这只会删除文件夹中的文件和rmdir foldername删除一个空文件夹。
我有这行代码，其中包含压缩文件的目录

dim ws as Worksheet
set ws = thisworkbook.sheets("Sheet1")
ws.range("P3").value ' contains the directory of the zip file

debug.print ws.range("P3").value 'result C:\Documents\MyFilesZip  23-Nov-16_18-06-03.zip
kill ws.range("P3").value

我已经这样做了，但它错误地说:`找不到路径
你能给我一些想法吗？

已经弄明白了，因为压缩文件是隐藏的，可能还有其他属性，所以我先把文件的属性设置为 vbNormal在杀死它之前:)

谢谢。

Answer 1

这就像一个魅力:

Kill  "C:\Users\gropc\Desktop\test.zip"