无法执行终止功能 VBA - 运行时错误“13”

Question

我无法在 Excel 中使用 Visual Basic 执行 Kill 功能。当我运行代码杀死时，我得到 ​​p>

“运行时错误'13'类型不匹配'

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

Kill("pathname")

和

Kill "pathname"

我在不同的位置尝试了不同的文件类型，但总是得到相同的错误。

编辑-我现在恢复尝试最简单的宏，但我仍然立即收到错误：

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

---

不过我有一个想法.. 你还没有创建一个名为Kill 的函数或SUB 是吗？我刚刚创建了一个，它并没有禁止它：

Function kill(filename As Integer)

End Function

如果存在这种情况，我在运行任何一个示例宏时都会遇到与您完全相同的错误 (13)。检查您的代码以了解 Kill 的其他用途。