excel表格怎么用vba批量建立文件夹? Excel建文件夹实例

日常工作中，我们时常需要创建文件夹来管理文件，通常都是一个一个创建，通过VBA可以实现批量创建文件夹。接下来分享使用VBA编写代码来批量创建文件夹的步骤，希望能帮到大家。

微软Office LTSC 2021专业增强版 简体中文批量许可版 2024年05月更新

• 类型：办公软件
• 大小：2.2GB
• 语言：简体中文
• 时间：2024-05-16

操作步骤如下：

步骤 1：启动VBA编辑器

打开Excel文件，依次点击【开发工具】—【Visual Basic】，或按下快捷键Alt + F11，启动VBA编辑器。

步骤 2：插入新模块

在VBA编辑器中，右键点击任意模块，选择“插入”，再点击“模块”，插入一个新的VBA模块。

步骤 3：编写VBA代码

输入以下VBA代码：

Sub 创建文件夹()
Dim folderNames() As String
Dim parentFolder As String
Dim folderPath As String
Dim i As Integer
' 指定要创建的文件夹名称，可根据需求添加或修改
folderNames = Split("1月,2月,3月", ",")
parentFolder = "E:\桌面\" ' 替换你想要创建文件夹的路径
' 循环创建文件夹
For i = LBound(folderNames) To UBound(folderNames)
folderPath = parentFolder & folderNames(i)
MkDir folderPath
Next i
MsgBox "文件夹创建完成！"
End Sub

步骤 4：运行代码

点击工具栏中的“运行”按钮或按下F5键，运行VBA代码。提示框中会显示“文件夹创建完成！”，表示文件夹创建成功。

步骤 5：查看创建结果

找到我们放置创建文件夹的位置，即存放的路径。就可以看到已经成功创建了以“1月”、“2月”等命名的文件夹。

这段VBA代码是用于批量创建指定名称的文件夹。

相关释义：

• folderNames() As String: 这是一个字符串数组，用于存储要创建的文件夹的名称。每个文件夹的名称都以逗号分隔，例如：“文件夹1,文件夹2,文件夹3”。
• parentFolder As String: 这是一个字符串变量，用于存储要创建文件夹的父文件夹的路径。在这个示例中，父文件夹的路径是"E:\桌面"。
• folderPath As String: 这是一个字符串变量，用于存储每个文件夹的完整路径。在循环中，将每个文件夹的名称与父文件夹路径拼接起来，形成完整的文件夹路径。
• For i = LBound(folderNames) To UBound(folderNames): 这是一个循环结构，用于遍历文件夹名称数组中的每个元素。LBound和UBound函数分别返回数组的下限和上限。
• MkDir folderPath: 这是一个VBA函数，用于创建文件夹。在每次循环中，将当前文件夹的完整路径传递给MkDir函数，以创建对应的文件夹。
• MsgBox “文件夹创建完成！”: 这行代码用于在创建完成后弹出一个消息框，提示用户文件夹创建完成。
• 在代码中需要替换`parentFolder`变量的值为你希望创建文件夹的父文件夹路径。可根据实际需求修改循环次数和文件夹命名规则。

通过以上步骤，我们可以利用VBA批量创建文件夹，提高文件管理效率，特别适用于需要大量文件夹的时候，如整理资料、存档数据等，希望大家喜欢，请继续关注酷瑞百科。

相关推荐：

excel表格怎么制作文件侧标签? excel文件夹标签的做法