RmDir-路径/文件访问错误VBA

Question

我正在尝试使用VBA中的RmDr函数删除文件夹。执行以下代码段时，出现以下错误：

  

“路径/文件访问错误”。

    'Delete HTML Folder
    If (DirExists(fileDir)) Then
        Kill fileDir & Chr(92) & "*.*"
        RmDir fileDir
    End If

文档内容如下：

  

备注如果您尝试在包含文件的目录或文件夹上使用RmDir，则会发生错误。在尝试删除目录或文件夹之前，请使用Kill语句删除所有文件。-https://msdn.microsoft.com/en-us/vba/language-reference-vba/articles/rmdir-statement

我的代码已经成功删除了文件夹的所有内容，但是我仍然收到此错误。

有人对此错误有经验吗？

Answer 1

大家都说过，代码似乎没有问题。 我仔细研究了一下，似乎与Office中的宏设置有关。

在Access中，我进入了文件>>选项>>信任中心>>信任中心设置，并将宏设置为启用。

现在，目标文件夹已成功删除。

感谢您的帮助。