ExcelTip.Net留存知识帖 ---【注:附件之前被网盘供应商清空后,现已修复-现已修复-现已修复为本地下载!】
现在位置:首页 > 我的酷贴 > 综合应用 > 如何批量创建已知路径的空文件夹呢?

如何批量创建已知路径的空文件夹呢?

作者:绿色风 分类: 时间:2022-08-18 浏览:162
楼主
0Mouse
Q:如何批量创建已知路径的空文件夹呢?
示例:

 
要求:批量创建单元格区域A1:A5内各文件路径对应的空文件夹。
A:可以采用批处理程序或借助VBA完成。

方法一:批处理(い卋玑┾宝珼)
操作步骤:在B1单元格输入以下公式后下拉至B5。
  1. ="md "&A1
选取单元格区域B1:B5,按下Ctrl+C,再依次单击“开始”-“运行”,在弹出的对话框的输入框内输入“notepad”,单击“确定”按钮,按下Ctrl+V,再依次单击“文件”-“保存”,“保存类型”务必选择“所有文件”,输入自定义文件名,如“批量创建空文件夹.bat”,单击“保存”按钮(文件保存位置无所谓),按下Alt+F4关闭记事本程序窗口,最后双击刚才创建的bat文件即可。
“运行”对话框

 

方法二:VBA
代码如下:
  1. Sub 批量创建已知路径的空文件夹()
  2. Dim i%
  3. On Error Resume Next
  4. For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row
  5.     MkDir Cells(i, 1).Text
  6. Next
  7. End Sub
附件:
批量创建已知路径的空文件夹.rar
2楼
绿篱
小千师公和西西都好厉害...
3楼
lg6052
谢谢分享
4楼
shorling
对于不喜欢代码的偶来说,方法一真心的稀饭,居家旅行必备之良药。
5楼
九洲鹿-旭尧
这个很方便 特别在整理电脑里的表格的时候

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素, 经与ExcelTip.Net站长Apolloh商议并征得其同意, 现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示, 供有需要的人士查询使用,也慰缅曾经的论坛时代。 所示各个帖子的原作者如对版权有异议, 可与本人沟通提出,或于本站点留言,我们会尽快处理。 在此,感谢ExcelTip.Net站长Apolloh的支持,感谢本站点所有人**绿色风(QQ:79664738)**的支持与奉献,特此鸣谢!
------本人网名**KevinChengCW(QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表
sitemap