无法执行kill函数VBA – 运行时错误“13”

我无法在Excel中使用Visual Basic执行“杀死”function。 当我运行代码杀死，我得到

“运行时错误”13“types不匹配”

有人有什么想法吗？ 我试过了

Kill("pathname") 

和

 Kill "pathname" 

我已经在不同的位置尝试了不同的文件types，并最终得到相同的错误。

编辑 – 我现在已经恢复到尝试最简单的macros，我仍然立即得到错误：

 Sub KillFile() Dim filetokill As String filetokill = "C:\Users\thomas.bennett\Desktop\test.txt" VBA.Kill filetokill End Sub 

Answer 1

这两个应该工作，从例如，您的桌面上删除一个文件。

 Sub killfile1() Dim filetokill As String filetokill = "C:\Users\yourusername\Desktop\test.txt" Kill filetokill End Sub 

---

 Sub killfile2() Kill "C:\Users\yourusername\Desktop\test.txt" End Sub 

---

我有一个想法，虽然..你还没有创build一个function或SUB叫Kill有你吗？ 我刚刚创build了一个，它并没有禁止它：

 Function kill(filename As Integer) End Function 

如果存在这种情况，则在运行我的示例macros时，会得到与您完全相同的错误（13）。 检查你的代码Kill其他用途。