小编Bre*_*123的帖子

删除文件夹中的所有文件

我有以下代码尝试搜索我的下载文件夹中的所有文件,然后将其全部删除,但是基于kill函数,它返回的错误消息没有足够的参数,有什么想法吗?

Sub Kill ()

Dim aFile As String
aFile = "C:\Test\Test\Downloads\*.*"
If Len(Dir$(aFile)) > 0 Then
    Kill aFile
End If

End Sub
Run Code Online (Sandbox Code Playgroud)

谢谢,

vba file kill

4
推荐指数
3
解决办法
2万
查看次数

标签 统计

file ×1

kill ×1

vba ×1