下面想和大家分享的是Vba设置批量删除指定文件夹中的所有文件?让我们看一看。
1.首先,创建一个新的excel文件,双击打开它。打开后,按快捷键F12将其另存为。注意将其保存为启用宏的工作簿的格式。
2.然后找到左上角的文件按钮,选择选项按钮。
3.在弹出的对话框中选择信任中心和信任中心设置,然后选择隐私选项,去掉保存时删除个人信息的复选标记。整体设置完成后,按快捷键ALT F11打开VBA编辑界面,插入一个模块。
4.插入后,将下面的代码复制到模块中,Sub删除指定文件夹()下的所有文件
对于i%=1的范围(' A1048576 ')。结束(xlUp)。排
杀死细胞(I,1) '\*。*"
然后
末端接头
5.然后我们看到新建文件夹的路径里有很多excel文件。这是我们需要删除的文件。
6.而且最后一个文件夹有很多新建文件夹的副本,这里也有很多excel,都需要我们删除。
7.然后找到批量提取修改文件名的宏文件,
8.打开后在视图中找到查看宏命令,找到提取文件名的宏命令,点击执行。这时,我们需要在弹出的对话框中找到我们对应的文件路径。注意,我们需要找到以前的文件夹路径来删除文件。
9.找到它之后,您可以看到所有的文件路径都已生成。此时,您需要用公式合并完整的路径。
10.合并后,您需要下拉单元格,合并副本的文件路径,然后将路径作为一个整体复制并粘贴到。Xlsm文件,该文件的A列,
1.粘贴完成后,在同一个视图中查看宏,找到我们对应的宏命令:删除指定文件夹中的文件,点击执行。
12.执行后,我们只是打开一个文件夹,发现里面的内容是空的。