Excel根据模板内容批量生成工作表，效率大大提升！

自我提升也是一种修养数万Excel爱好者聚集地

2021年3月3日 周三

【Excel情报局｜文案回收铺子】

陪伴是最了不起的安慰

根据模板批量生成日报表

根据“日报模板”表格批量生成1日~10日的报表，普通小伙伴没什么好方法，只能一个一个的复制然后修改名称。但如果用VBA来说，只需用一段代码模板运行即可瞬间完成。

完成后的效果图：

步骤演示：

①鼠标右击“日报模板”工作表名称，再点击“查看代码”功能。自动弹出VBA代码录入界面。

②然后我们将下面一段代码模板复制粘贴到VBA录入窗口中。随后点击运行按钮即可。

代码如下所示：

Sub 生成报表()

Dim x As Integer

Dim sh As Worksheet

For x = 1 To 10

Set sh = Sheets.Add

With sh

.Name = x & "日"

Sheets("日报模板").Range("1:15").Copy sh.Range("A1")

End With

Next x

End Sub

③最后我们点击右上角叉号关闭VBA窗口，自动回到Excel表格主界面中，我们发现已经根据“日报模板”表格批量生成1日~10日的报表了！

286期（个）Office技巧学习视频

免费打包下载方式

百度云下载链接：

https://pan.baidu.com/s/1VzuHfu9LTgYokcb6b4w4mQ

扫描下方二维码 关注公众号

上方公众号后台聊天窗口

回复关键字

“我要学习”

获取下载 提取码

阅读完文章之后，希望大家在文末帮我点亮“在看”按钮，坚持的路上需要有你们的鼓励

如何在【Excel情报局】微信公众号内通过输入关键字搜索历史文章？

常识普及：

①第1步：进入【Excel情报局】微信公众号，点击底部菜单“情报.xls”

②第2步：点击“历史文章”按钮

③第3步：顶部搜索框内输入你要搜索的关键字，比如“合并”，点击确定，进行搜索。参照下面视频操作：

相互尊重，抱团成长。

Excel2016版安装包(含永久激活工具) 百度网盘

下载链接：
https://pan.baidu.com/s/11eE-oGEyHojXHoYSuDbBAA