VBA代码按模板批量新建Excel工作簿（1.0）

原创 已于 2024-11-07 16:52:21 修改 · 1k 阅读 · 4 ·
CC 4.0 BY-SA版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#excel

于 2024-10-17 23:56:32 首次发布

******以下代码修改自“文心一言3.5模型+B站UP教学代码”，若有侵权行为！请私信博主！后续会删除此文！*****************************************仅作分享，如有不足，评论区敬请指出***************

1.上班的时候遇到了要按照某一模板批量新建工作簿（不是工作表，请识别清楚）的情况，为了节省时间精力，搜了一些教程，另一个DOS命令处理没成功，后面研究一下，会python或者其他编程语言的小伙伴也可以直接上其他方法。

2.此方法针对只使用Excel一款软件的情况，不用下载其他编译器与外部插件，较为便捷。下列分享代码运行环境：Excel自带的“开发工具”中的“Visual Basic”。

（1）点击“开发工具”（在导航栏可以找到），找到“Visual Basic”并点击（详细步骤参照 >>（2）>>⑤起始）。

（2）如若“开发工具”这一选项被隐藏，需要勾选才会在导航栏出现此功能。步骤如下：

①随意打开一个.xlsx文件，初始导航栏如下，点击“文件”。

②来到首页界面，最下方，点击“选项”

③选项界面找到“自定义功能区”并点击，在最右侧下拉列表中勾选开发工具，最后点击确定即可。

④回到打开的.xlsx文件，点击“开发工具”选项看到第一个“

最低0.47元/天 解锁文章
享--寿
关注
vba脚本（通过模板和数据表生成多个表）
业余编程小白
02-21 1499
Attribute VB_Name = "模块" Sub 由模板生成() Attribute 由模板生成.VB_ProcData.VB_Invoke_Func = " \n14" Dim outdir As String 'outdir 输出文件目录 outdir = "D:\output\" If dir(outdir) = "" Then MkDir outdir End If If Sheets.C
Excel 2010 VBA 入门 061 按模板快速生成指定数量的工作表
复行数十步
04-19 2351
目录 示例 实现代码 工作表对象(Worksheet)及其表示方法 1．序号表示法 2．工作表名称表示法 3．对象名称表示法 工作表集合和工作表 工作表常用的基本属性 工作表的添加与复制 工作表对象(Worksheet)与单元格对象(Range)的关系 工作表的删除 Application. DisplayAlerts属性 示例 如图所示，该表为某公司在银行的余额汇总。现希望按照模板的格式生成若干张工作表，各工作表以银行名称作为表格名称，并将该银行信息填入表内。如何用V...
Excel根据模板内容批量生成工作表！
a3756549408的博客
08-03 1900
Excel根据模板内容批量生成工作表！
用VBA做的根据自动模板批量生成新表格
12-16
用VBA制成的可根据模板工作表，批量生成新的工作表，并能自动编号及工作表命名。
VBA代码按模板批量新建Excel工作簿&自动填充单元格信息（2.0）
最新发布
GooBt的博客
10-23 2042
（即新建工作簿所需名单所在的那个文件，也是粘贴代码的那个文件）。调试过了，一直报错，显示计算越界，进入死循环了，后续将做优化。(2)——>将代码①粘贴到Demo - Template工作簿中，运行，即可得到批量新建并且已经命名好的工作簿。(3)——>再将代码②粘贴到Demo - Value工作簿中，运行，新建的工作簿中单元格信息即被填充好。文件为模板文件，各个单元格的文本格式（数字、文本、日期等）您可以设置好，为填充信息做准备。1.代码①用于将模板复制到新建工作簿中，代码②用于将。为什么不把两个功能合并？
VBA学习(8)：按指定模板批量创建工作表
nianfen的博客
06-18 1648
第20至第24行代码采用试错的方式，判断当前工作簿是否有名为"模板"的工作表，如无，则弹窗提醒用户，并退出程序。首先，当前工作簿内需要存在一张名为"模板"的工作表；该工作表的格式和数据可以根据个人需要自定义。第35行代码删除可能重名的旧工作表。第37行代码复制模板表，并放置在当前所有工作表之后。今天给大家分享一下如何按指定名单和模板批量创建工作表。然后在另外一张工作表提供需要创建新工作表的名单。第32至第47行代码遍历新建工作表名单。最后，复制运行以下代码即可。
按模板批量生成工作表
陈表达的博客
10-12 341
按模板批量生成工作表，前提一个模板，然后用代码遍历循环填写人名，再保存为副本，即可达到效果。按模板批量生成工作表代码。
VBA 根据模板批量生成工作表
寻的博客
05-28 1886
Sub 生成测试() Application.ScreenUpdating = False Application.DisplayAlerts = False Application.EnableEvents = False Dim my_path As String my_path = ThisWorkbook.Path & "\生成的测试书" Dim i As Integer For i = 2 To 101 sheet2.Copy after.
Excel VBA高手私藏技巧：酒店预算报表自动填充的7大高级实战
本文围绕Excel VBA在酒店预算报表自动化中的应用展开，系统介绍了VBA基础编程、预算数据建模、自动化报表生成与发送等关键实现环节。通过构建标准化的数据结构与逻辑模型，结合实战案例，详细讲解了如何利用VBA操作...
CMK计算表格深度拆解：基于Excel的自动化模板设计（含源码实现）
本文系统研究了设备能力指数（CMK）的理论基础与计算逻辑，构建了一套基于Excel平台的CMK自动化分析模板。通过整合数据标准化处理、统计函数精准调用与动态可视化技术，实现了从原始数据采集到结果输出的全流程管理...
打造企业级酒店预算系统：Excel模板设计5大核心原则与复用技巧
!...文章从数据结构规范化、公式可维护性及界面友好性三个核心原则出发，深入探讨了预算系统的设计要点，并结合实践构建了涵盖数据录入、成本收入预测、预算对比分析等模块的Excel模板体系。进一步
统一Excel报表样式规范：打造专业级格式化输出的4大核心技巧
本文系统阐述了Excel格式化设计的核心原则，包括数据可视化排版、报表结构标准化及样式主题机制，进一步结合实战操作技巧，探讨了模板应用、样式复用与条件格式联动等方法。同时，文章分析了VBA与外部工具在高级格式...
vba 创建excel 文件
热门推荐
muyuruo
02-10 1万+
sub Create(paths,files) Dim w As Workbook     Set w = Application.Workbooks.Add     On Error Resume Next     w.SaveAs Filename:=paths & "\" & files & ".xlsx"             '在此输入新建工作簿的文件名，包括完整路径和扩展名
VBA来创建一个新的 Excel 文件
MARST.ZHANG的博客
02-26 3525
其他的宏指令执行的前提条件是创建一个新的xlsx文件,来存储操作完成后的结果.否则会因为缺少操作对象,出现1004错误.
Excel·VBA模板生成文件
hhhhh_51的博客
04-24 2243
不同于《python实现Excel邮件合并》，字符串内容替换生成文件，仅复制整行数据插入模板中生成工作表，单独保存为工作簿，但如果存在同名工作簿文件，则将工作表附加在该工作簿中 Sub 模板生成工作薄() Application.Visible = False '后台运行，不显示界面 Application.DisplayAlerts = False '不显示警告信息 Dim arr, i, k, v, dict As Object, d As Object, fso As Ob
VBA中新建、读取、保存和另存EXCEL
weixin_33841722的博客
08-29 1237
Dim app_excel As Excel.Application Dim book_excel As Excel.Workbook Set app_excel = New Excel.Application '申请一个Excel.Application内存...
实用VBA：9.使用Excel批量套模板，一键输出多个工作表
周公笃行的博客
12-05 1万+
工作中常遇到需要将大量数据填入表格模板，并保存为单独的Excel文件的情况。例如HR部门将掌握的人员基本信息批量输出为统一格式的信息表；学校将汇总的全部成绩数据为每名学生生成格式统一的成绩单；将汇总的工作记录信息生成格式统一的日志报表……诸如此类的情况。例如为下面表格中的人员批量生成个人信息表（套模板）。
将Excel明细表按指定模板样式批量生成新表，也可生成工作簿
qq_35692191的博客
02-21 5652
根据明细表和自己指定的模板生成新工作表(也可以不生成新表，直接打印)，相当于套打工具或者邮件合并工具。本工具相当灵活，不限制模板样式，且支持二维码和图片。
VBA代码实例---批量新建工作表模板
半个馒头
04-19 1万+
在工作中，经常需要用到一个操作：批量生成工作表，工作表名字指定。下面写一个VBA，希望能达成如下功能： 1、转移性好，可以直接复制使用； 2、不限制重复，并且以此排序； 3、批量新建工作表； ¤操作步骤¤ 第一步：打开工作表，并把需要新建的工作表名字放在第一列，并且A1单元格为标题； 第二步：菜单—开发工具—VisualBasic--召唤VBE（Alt+F11/Fn+Alt+F11）
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值