Vba设置批量删除指定文件夹下的所有文件

 时间:2024-10-12 02:03:28

1、首先新建一个excel文件并双击打开,打开后,按快捷键F12进行另存为,注意另存的格式要选择启用宏的工作簿,如下图所示:

Vba设置批量删除指定文件夹下的所有文件
Vba设置批量删除指定文件夹下的所有文件
Vba设置批量删除指定文件夹下的所有文件

2、接着找到左上角的文件按钮,选择选项按钮,如下图所示:

Vba设置批量删除指定文件夹下的所有文件
Vba设置批量删除指定文件夹下的所有文件

3、在弹出的对话框中选择信任中心,并选择信任中心设置,接着选择隐私选项,并把保存时删除稍僚敉视个人信息的对号去掉,整体设置完成,按快捷键ALT+F11,打开VBA编辑界面,并插入一个模块,如下图所示:

Vba设置批量删除指定文件夹下的所有文件
Vba设置批量删除指定文件夹下的所有文件
Vba设置批量删除指定文件夹下的所有文件

4、插入后将如下代码复制到模块中,Sub 献皲咝犴删除指定文件夹下的所有文件()For i% = 1 To R锾攒揉敫ange("A1048576").End(xlUp).RowKill Cells(i, 1) & "\*.*”NextEnd Sub如下图所示:

Vba设置批量删除指定文件夹下的所有文件

5、接着我们看到新建文件夹的路径里有很多excel文件,这就是我们需要删除的文件,如下图所示:

Vba设置批量删除指定文件夹下的所有文件

6、而且上一个文件夹又有很多新建文件夹的副本,这里也有很多excel,都是我们需要删除的,如下图所示:

Vba设置批量删除指定文件夹下的所有文件

7、然后找到批量提取文件名和修改文件名的宏文件,如下图所示:

Vba设置批量删除指定文件夹下的所有文件

8、打开后找到视图中的查看宏命令,并找到提取文件名的宏命令,单击执行,此时需要在弹出的对话框中找到我们对应的文件路径,注意需要找到要删除文件的文件夹的上一级路径,如下图所示:

Vba设置批量删除指定文件夹下的所有文件
Vba设置批量删除指定文件夹下的所有文件
Vba设置批量删除指定文件夹下的所有文件

9、找到后即可看到所有的文件路径已经生成,此时需要用&公式将完整路径进行合并,如下图所示:

Vba设置批量删除指定文件夹下的所有文件

10、合并后需要下拉单元格,将副本的文件路径进行合并,然后整体将路径进行复制并数值粘贴到,删除指定文件夹下的文件.Xlsm,这个文件的A列,如下图所示:

Vba设置批量删除指定文件夹下的所有文件
Vba设置批量删除指定文件夹下的所有文件

11、粘贴完成后,同样视图查看宏找到我们对应的宏命令:删除指定文件夹下的文件,并单击执行,如下图所示:

Vba设置批量删除指定文件夹下的所有文件

12、执行后,我们随便打开一个文件夹,发现里面的内容已经为空了,如下图所示:

Vba设置批量删除指定文件夹下的所有文件
  • 怎样使用VBA统计格式为“常规”之单元格个数?
  • 怎样使用VBA双条件排序:首列升序、次列降序?
  • Excel如何VBA编辑输入窗口标题
  • excel中使用vba制作查找功能控件
  • VBA怎么获取控件名称
  • 热门搜索
    文明伴我行手抄报内容 健康手抄报的内容 关于节俭的手抄报 寒假手抄报大全 手抄报感恩 创文明城市手抄报资料 平安手抄报内容 垃圾减量分类手抄报 关于桥的手抄报图片 六一手抄报版面设计图