返回首页
当前位置: 主页 > Excel教程 > Excel VBA教程 >

excel利用VBA批量创建指定名称的文件夹

时间:2012-08-20 14:19来源:Office教程学习网 www.office68.com编辑:麦田守望者

有时在工作中需要批量创建指定名称的文件夹,如果数量较多,例如要创建几十、甚至几百个文件夹,用手动的方法很难完成。批量创建文件夹的工具有很多,如果一时手头没有这类工具,可以在Excel中用VBA来完成,方法如下:

1.新建一个工作簿,在A列中输入要创建的文件夹名称,在B1单元格中输入文件夹所在的有效路径,如“d:\新建文件夹”。

2.按Alt+F11,打开VBA编辑器。在右侧的代码窗口中输入下列代码:

Sub BatchCreatFolders()
Dim rCel As Range
For Each rCel In ThisWorkbook.Worksheets("Sheet1").UsedRange.Columns(1).Cells
On Error Resume Next
'B1单元格为新建文件夹所在的路径
MkDir Range("B1").Text & "\" & rCel.Text
Next
End Sub

3.运行上述代码,即可批量创建指定名称的文件夹。

------分隔线----------------------------
标签(Tag):excel excel2007 excel2010 excel2003 excel技巧 excel教程 excel实例教程 excel2010技巧
------分隔线----------------------------
推荐内容
猜你感兴趣