欢迎光临散文网 会员登陆 & 注册

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

2020-03-23 11:49 作者:秋叶Excel  | 我要投稿

关注公.众.号【秋叶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】,回复关键词【插件】~下载安装方方格子,助力高效办公!

不要眨眼!批量创建100个工作表,只需30秒~的评论 (共 条)

分享到微博请遵守国家法律