Question

美好的一天，

目前我正在制作一份小型Excel VBA表，我们应该帮助准备CAD版本更改的数据。所有这些文件都保存在网络驱动器（服务器）上，但我具有读写权限。除了最后的清理之外，现在一切正常。处理完文件后，我必须删除剩余的文件夹和文件（thumbs.db）。

不幸的是这些文件是在服务器端创建的，我无法禁用此设置。

我正在寻找一个VBA代码来删除特定路径中的所有内容（文件和文件夹）。我现在所拥有的只是:(存储来自另一个模块）

Dim fso As Object
Set fso = CreateObject("scripting.filesystemobject")
If Right(saveto, 1) = "\" Then
MyPath = Left(saveto, Len(saveto) - 1)
End If
On Error Resume Next
fso.deletefile saveto & "\*.*", True
fso.deletefolder saveto & "\*.*", True
On Error GoTo 0

但是使用这段代码我没有摆脱这些愚蠢的thumbs.db（创建为“系统文件”）。任何人都可以帮我完成最后一部分？

编辑（标记为重复）我想用“filesystemobject”来解决它

Answer 1

这很简单：

for m in c

使用VBA删除文件和文件夹（Excel）

1 个答案: