Excel中如何使用宏命令批量删除指定路径下的文件夹

时间:2021-05-18

  下面要和大家分享的是:Excel宏命令批量删除指定路径下的文件夹。

  1、首先打开文件夹,可以看到有很多的文件夹,当然这些文件夹如果路径相同,我们可以全选统一删除,但是如果这些文件夹不在同一个路径下,又如何统一删除呢,如下图所示:

  2、我们需要新建一个工作簿,名字根据自己的需要设定, 格式另存为xlsm宏的工作簿 ,如下图所示:

  3、然后按快捷键 alt+f11 打开宏代码窗口,然后选择插入模块命令,如下图所示:

  4、插入后将如下代码复制粘贴到模块中:

  Sub 删除指定文件下的文件夹()

  Dim fso

  Set fso = CreateObject("Scripting.FileSystemObject")

  For i% = 1 To Range("A1048576").End(xlUp).Row

  If fso.FolderExists(Cells(i, 1)) Then

  fso.DeleteFolder (Cells(i, 1))

  End If

  Next

  End Sub

  ,如下图所示:

  5、设置完成后,接下来,我们需要找到删除文件的完整路径,在这里可以利用另一个提取文件完整路径的工具,按快捷键 alt+f8 找到提取文件的宏命令,单击执行,如下图所示:

  6、执行后,找到要删除的文件夹,如下图所示:

  7、然后用&函数将完整路径进行连接,如下图所示:

  8、接着选中所有路径,复制并数值粘贴到刚刚编写的宏命令对应的 excel表格A列中 ,如下图所示:

  9、最后按快捷键 alt+f8 找到删除的宏命令,单击执行,即可删除,如下图所示:

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章