不要眨眼!批量创建100个工作表,只需30秒~

关注公.众.号【秋叶Excel】,回复关键词【插件】~下载安装方方格子,助力高效办公!
大家好!我是最近开始做月份计划报表的绿水零~
工作中,批量创建 Sheet(工作表)的场景很常见,通常需要按指定的名称创建:
创建不同月份的工作表,每个表按月份命名;
创建不同分店的工作表,每个表按店名命名;
创建不同城市的工作表,每个表按城市命名;
……
大家使用 Excel 的时候,请一定要记住这个原则:

那么就以创建 12 个月份的工作表为例,给大家介绍 3 种方法。
来看看怎样按指定名称,批量创建工作表吧~
01 数据透视表—显示筛选页
❶ 列出名称列表。
在【Sheet1】工作表的 A 列,列出需要新建的工作表名称。

❷ 全选名称列表,注意要包含标题行。
选择【插入】选项卡-【数据透视表】,插入位置随意,点击【确定】。

❸ 将【月份】字段放进筛选。

❹ 点击【分析】选项卡-【数据透视表】-【选项】-【显示报表筛选页】。
在弹出的窗口中选择【月份】,点击【确定】。
【分析】选项卡仅在选中数据透视表时,才会显示。
如果没有找到【分析】选项卡,请确认当前是否选中数据透视表。

让我们来看看结果吧~

我们通过数据透视表【显示报表筛选页】的功能,按设置的筛选条件创建工作表。
而它「正经」的功能是,将数据透视表按筛选条件拆分成多个工作表。
有兴趣的同学可以试一试,相信你会和我一样,被它惊艳到!
02 方方格子—批量创建工作表
方方格子是一款强大的 Excel 插件工具,用它可以轻松完成批量创建工作表的任务。
前往「方方格子」官网,或关注公.众.号【秋叶Excel】,回复关键词【插件】,下载安装。
下面来看看如何使用方方格子,批量创建工作表吧~
❶ 列出名称列表。
和第一种方法一样,这里就省略啦~
❷ 点击【方方格子】选项卡-【工作表】-【创建工作表】。

❸ 在弹出的对话框中:
表名命名选择【来自区域 A2:A13】(即名称列表,这里不需要选标题行);
【选项】-【内容拷贝自】,去掉勾选;
点击【确定】。

让我们来看看效果~

方方格子,除了上文提到的使用方法,还可以按行拆分工作表。
同样可以达到这个效果~
03 VBA—大佬代码为我所用
VBA?!
咳咳,淡定淡定,别慌。
不用写代码,网络上已经有很多大佬写的现成的代码,我们只需套用即可。

下面是一段我们待会要用到的代码:
Sub ShtAdd()
'以「Sheet1」工作表 A 列中的信息来新建不同名称的工作表
i = 2
'因为第一工作表的名称保存在第二行,所以 i=2
Do While Worksheets("sheet1").Cells(i, "A") <> ""
'创建一个循环,当 A 列的单元格为空时,退出循环
Worksheets.Add after:=Worksheets(Worksheets.Count)
'新建工作表,并将其排在最后
ActiveSheet.Name = Worksheets("sheet1").Cells(i, "A").Value
'更改工作表的标签名称
i = i + 1
'行号增加 1
Loop
End Sub
那么,这段代码要怎么使用呢?
❶ 列出名称列表。
❷ 打开 VBE:
按【Alt】+【F11】打开 VBE 窗口,即 VBA 的编程工具,我们在这里编写 VBA;
❸ 套代码:
将之前的代码复制到【Sheet1】的代码窗口;
❸ 运行代码:
全选代码,点击运行。

效果是一样的,这里就不看效果了~
04 总结
最后我们来总结一下,看看你更喜欢哪种方法?
❶ 数据透视表:
推荐等级★★★★★
数据透视表功能十分强大,Excel 自带,无须单独安装,而且操作简单。
❷ 方方格子:
推荐等级★★★★☆
方方格子也具有强大的功能,不过需要另外安装插件。
关注公.众.号【秋叶Excel】,回复关键词【插件】;或登录官网,可获取下载。
❸ VBA:
推荐等级★★★☆☆
VBA 当然很优秀,但入门有一定的门槛。
想深入学习的同学,可以继续研究研究。
不过,前两种方法就已经可以满足需求了,杀鸡焉用牛刀呢~
学到新知识,记得关注转发点赞哦~
关注公.众.号【秋叶Excel】,回复关键词【插件】~下载安装方方格子,助力高效办公!