Excel如何批量操作文件夹

内容导航：

Excel如何批量操作文件夹

利用Excel批量生成指定名称的文件夹

如何根据Excel人员名批量建立文件夹

如何根据Excel人员名批量建立文件夹

一、Excel如何批量操作文件夹

今天主要是聊聊使用Excel如何批量操作文件夹，常见的增、删、查、改！

最常见的就是，批量查找，比如我们先看一下，某个文件夹下有哪些子文件夹！我们可以使用DIR函数处理！

▍S01 - 批量查找文件夹

比如我们想看一下D盘下面有哪些文件夹，那么可以使用下面的代码处理

▼VBA源码分享：根据需要修改路径

'作者：E精精'公众号：Excel办公实战'--------------------------------------Sub 获取全部子文件夹()'需要处理的文件夹路径Const sPath As String = "D:\"Dim subPath As StringsubPath = Dir(sPath, vbDirectory)DoWhileLen(subPath) <> 0Debug.Print subPathsubPath = DirLoopEndSub

其实主要使用到的核心函数，就是DIR函数！关于此函数，看一下文档说明

注意两点

1、查找不到返回空或者说字符串长度0

2、第二参数 VBdirectory 或者16，表示查询文件夹，默认0-查询文件

说完查找，我们来看看如何批量新增！

▍S02 - 批量新增文件夹

批量新增，ExcelVBA中给我们提供了mkdir函数

mkDir语法如下：给一个文件夹全路径即可！

比如我们想在D盘下面，常见一个 “Excel办公实战目录”

那如果我们要创建多个呢？很简单，加一个循环即可！比如我们要创建周一到周日的7个文件夹！

>在Sheet1表A1：A7，输入星期一到星期日

在 D:\Excel办公实战目录 目录下创建 星期一到星期日，7个文件夹！

▼VBA源码分享：根据需要修改路径

Sub 创建文件夹()For i = 1To 7MkDir "D:\Excel办公实战目录\"& Cells(i, 1).ValueNextEnd Sub

▼VBA源码分享：根据需要修改路径

▍S03 - 批量删除文件夹

Excel中可以使用 Rmdir删除文件夹，语法如下：

这个是否就有同学要问了，我怎么知道是否是空文件夹？其实可以换一种思路，你直接删，如果不是空的会报错，我们跳过错误就可以了，利用这个我们可以快速删除 指定路径下的全部空文件夹！

▼下面是的代码是删除D盘下的空文件夹

▼VBA源码分享：根据需要修改路径

'作者：E精精'公众号：Excel办公实战'--------------------------------------Sub 批量删除D盘下的空文件夹()Const sPath As String = "D:\"Dim subPath As StringsubPath = Dir(sPath, vbDirectory)On Error Resume NextDoWhileLen(subPath) <> 0RmDir sPath & subPathIfErr <> 0ThenDebug.Print "删除失败 > "& subPath: Err.ClearElseDebug.Print "删除成功 > "& subPathEndIfsubPath = DirLoopEndSub

▍S04 - 批量修改文件夹

所谓批量修改，也就是批量重名，批量重命名，我们可以使用 Name函数处理

Name语法：Name 老文件夹名称 as 新文件夹名称

比如我们之前创建了星期一到星期日的7个文件夹，现在我们想重命名为 周一到周日，那么要如何处理！

表中两列，新旧名称准备好！

'作者：E精精'公众号：Excel办公实战'--------------------------------------Sub 批量重命名()'需要处理的父文件夹路径ConstbasePath AsString = "D:\Excel办公实战目录\"For i = 1 To 7Name basePath & Cells(i, 1) As basePath & Cells(i, 2)NextEnd Sub

OK！文件夹的常见批量操作我们就说到这里！其实还有一个专门处理文件和文件的对象 FSO对象，不过相对新手有点难度！改日再聊！

一、利用Excel批量生成指定名称的文件夹

1、excel中创建文件夹指定名称，增加辅助列，辅助列公式=“MD ”&“文件夹名称”（注意MD后有空格）

2、将辅助列复制至文本文件，保存后关闭。

3、选中文本文件，在“资源管理器”的-“查看”-“选项”中勾掉“隐藏已知文件类型的扩展名”。

4、将text文件的后缀改为“bat”并双击。

5、所有指定文件名称的文件夹即创建完毕。

二、如何根据Excel人员名批量建立文件夹

我们在日常的工作中经常需要根据Excel中的人员名单批量建立文件夹，那么该如何操作呢？下面小白给大家演示分享一下。

工具/材料

Excel

• 01

  首先我们打开Excel，准备一个人员表格，如下图所示，接下来将会根据姓名批量新建文件夹

• 02

  我们一般的做法是比对着excel表格，然后在某个盘符下面挨个右键单击选择新建文件夹，接着在重命名文件夹，如下图所示，这样的做法很显然非常的费时费力

• 03

  接下来我们采用一种巧妙的办法，首先在excel表格的空白列输入公式"md "&A2，如下图所示

• 04

  接下来我们向下拉取公式，然后复制整列的值，如下图所示

• 05

  接着我们新建一个txt文件，将复制的值拷贝到txt文件中，如下图所示

• 06

  然后我们需要修改txt文件的后缀名，将其修改为bat，修改的过程中会弹出如下图的提示，我们点击是即可

• 07

  接下来我们单击bat文件就可以在当前文件夹下面看到依据excel中人员姓名建立的文件夹了，如下图所示

• 08

  最后如果我们想把文件夹建在某一个盘符下面的话，只需要在md后面添加上盘符路径即可，如下图所示

三、如何根据Excel人员名批量建立文件夹

我们在日常的工作中经常需要根据Excel中的人员名单批量建立文件夹，那么该如何操作呢？下面小白给大家演示分享一下。

工具/材料

Excel

首先我们打开Excel，准备一个人员表格，如下图所示，接下来将会根据姓名批量新建文件夹

我们一般的做法是比对着excel表格，然后在某个盘符下面挨个右键单击选择新建文件夹，接着在重命名文件夹，如下图所示，这样的做法很显然非常的费时费力

接下来我们采用一种巧妙的办法，首先在excel表格的空白列输入公式"md "&A2，如下图所示

接下来我们向下拉取公式，然后复制整列的值，如下图所示

接着我们新建一个txt文件，将复制的值拷贝到txt文件中，如下图所示

然后我们需要修改txt文件的后缀名，将其修改为bat，修改的过程中会弹出如下图的提示，我们点击是即可

接下来我们单击bat文件就可以在当前文件夹下面看到依据excel中人员姓名建立的文件夹了，如下图所示

最后如果我们想把文件夹建在某一个盘符下面的话，只需要在md后面添加上盘符路径即可，如下图所示