求助！批量新建文件夹并命名的软件或命令

求助！批量新建文件夹并命名的软件或命令

1、将上述1120015 1120016 1120019 粘贴到Excel表，从A1单元格开始。2、Alt + F113、插入—模块4、双击左侧“模块唯搏族1”，在右侧输入以下代码。 Sub 批量建文件夹()Dim i As Integeri = 1Do While Range("A" & i).Value <> "" MkDir "d:\" & Range("A" & i).Value i = i + 1LoopEnd Sub 5、回到Excel表，按Alt + F8，点“批量建文指弊件夹”—“执行”。将在D盘下生成空文件夹。注意：运行一次后D盘下已经建了很多空文件夹，如果再次执行第5步，会因银厅为同名文件夹已经存在而提示出错。