在VBA中删除文件 - 错误53

时间:2016-10-05 17:13:00

标签: excel vba excel-vba

我在VBA(在Mac上)有一个Sub来删除文件,当文件存在时它可以正常工作。但是,我得到了"运行时错误' 53'文件未找到"当文件不存在时,即使代码正在检查它是否存在。

我尝试了几个不同的潜艇,包括http://word.mvps.org/faqs/macrosvba/DeleteFiles.htm和。{ Deleting a file in VBA

Sub DeleteFile()

Dim KillFile As String
KillFile = "/Users/me/Downloads/myfile.csv"
'Check that file exists
If Len(Dir$(KillFile)) > 0 Then
    'First remove readonly attribute, if set
    SetAttr KillFile, vbNormal
    'Then delete the file
    Kill KillFile
Else
End If

End Sub

为什么我应该已经由If语句处理这个错误?

感谢。

编辑:我想删除/仅搜索此特定文件,我可以使用Dir和MacID吗?我不需要梳理所有CSV或TEXT文件的目录。

0 个答案:

没有答案