1、新建一个Excel表格,输入需要新建的各工作簿名称,如图所示,慢慢来,不要心急。
2、alt+f11快捷键,或者【开发工具】-【visual basic】-【插入】-【模块】见到如下界面;如果电脑里没看到【开发工具】选项卡,请参考其他百度经验。
3、在VBE界面中输入以下代码:Subnewbooks()Dimi&,p$,temp$OnErrorResumeNextApplication.ScreenUpdating=Falsep=ThisWorkbook.Path&"\"Fori=2ToCells(Rows.Count,1).End(3).Rowtemp=Cells(i,1)&".xlsx"WithWorkbooks.Add.SaveAsp&temp.CloseFalseEndWithNextApplication.ScreenUpdating=TrueEndSub
4、然后选择【运行】,如图所示,进行操作,你可看到电脑运行的窗口,快慢就看你电脑的配置了。
5、即可查看到你所完成的新建的工作簿,记住是在你新建的(指定工作簿名称)表的同一个文件夹下:我的电脑是显示在电脑桌面的!