Excel明细数据生成多个word文档,Excel魔方轻松完成
场景:
我有这样一个明细表,需要按某列关键字,拆分到word文档中。
word文档是下面的样子:
通常来说,如果只有型号、编号等数据,可以用邮件合并来完成。
但是,明细表有多对一的关系,也就是说,一个型号对应多条数据,都要填写到【检查记录】部分。难点就在此处。
操作步骤:
打开这个菜单的按钮
首先我们要制作一个Word模版,程序依据此模板来批量生成word文档。
模板制作的规则:
模板中,需要替换的字段,这么标识:
Excel中列名是姓名,到Word里面就要改成【姓名】,以此类推。
多条明细内容,需要单独加明细二字:
Excel中列名是颜色,到Word里面就要改成【颜色】明细,以此类推。
配置好之后,我们做好其他的配置。开始运行。
这里的明细行数是固定12行,如果超过12行,则新增一页,从新写新的行。其他信息保持不变。
打开结果文件夹:
所有信息都正确写入了
相关代码可以借鉴:
Sub 提取数据()
On Error Resume Next
N = 1
Set doc = CreateObject("word.application")
f = Dir(ThisWorkbook.Path & "\*.doc")
Do While f <> ""
N = N + 1
Set wd = doc.documents.Open(ThisWorkbook.Path & "" & f)
doc.Visible = True
With doc.documents(1).Tables(1)
Cells(N, 1) = l(.cell(1, 2).Range) '姓名
Cells(N, 2) = l(.cell(1, 4).Range) '性别
Cells(N, 3) = l(.cell(1, 6).Range) '年龄
Cells(N, 4) = l(.cell(2, 2).Range) '籍贯
Cells(N, 5) = l(.cell(2, 4).Range) '身份证号
End With
f = Dir
wd.Close False
Loop
doc.Quit
MsgBox "完成!"
End Sub
Function l(a)
l = Left(a, Len(a) - 2)
End Function
Excel明细数据生成多个word文档,Excel魔方轻松完成相关推荐
- excel明细生成多个word文档,比邮件合并好用100倍。
需求:把excel明细批量生成word文档,每条明细生成1个文档. 将上面的WIFI用户名.密码填到word文档中相应位置,并且需要插入图片. 通常用的是word邮件合并功能,但是步骤多,麻烦.插件简 ...
- 把Excel数据填充word模板生成多份word文档
有些事情,你想记得的就会记得.有些事情,你想忘记的就会忘记,如果忘记不了,那就不要忘记了,因为忘记是不需要努力的. Model_Car.cs代码 public class Model_Car{publ ...
- Word邮件合并功能详解:合并后生成多个word文档,删除空白页
Word邮件合并功能详解:合并后生成多个word文档,删除空白页 最近在实习,干了很多打杂得工作,所以office软件用的很多很多,瞬间觉得自己可以去裸考计算机二级了哈哈哈哈哈哈.今天因为工作用到了邮 ...
- 利用poi读取word模板文件生成新的word文档
利用poi读取word模板文件生成新的word文档 利用poi读取word模板文件,并回填逻辑数据,生成并导出需要的word文档源码.解决模板读取异常问题,提供wordUtils工具类(各种功能实现) ...
- java word模板poi生成文件_利用poi读取word模板文件生成新的word文档
利用poi读取word模板文件生成新的word文档 利用poi读取word模板文件,并回填逻辑数据,生成并导出需要的word文档源码.解决模板读取异常问题,提供wordUtils工具类(各种功能实现) ...
- Excel VBA实现从多篇Word文档内抓取文本框内内容(书接上一篇博客)
Excel VBA实现从多篇Word文档内抓取文本框内内容(书接上一篇博客) 一.前情提要 我在上一篇博客<VBA摘取Word图形(Shapes)内文字>里验证了遍历doc文档内图形--尤 ...
- Python 将excel中的选择题 导入到word文档中
Python 将excel中的选择题 导入到word文档中 0x00 昨天,我的老师给我们一个包含600道关于比赛的选择题和判断题的excel文档,要我们整理成指定格式的word文档以后交给他.我看着 ...
- 自定义maven插件:自动生成API的word文档
继上次开发完Maven插件开发:根据库表生成实体类&根据实体类生成库表之后,博主对开发maven插件喜爱得一塌糊涂.这不,今天给大家带来了<自定义maven插件:自动生成API的word ...
- php word 邮件合并发送邮件,WPS 邮件合并 30秒批量制作Word文档 Excel数据批量导入World指定位置...
有时候因工作需要,会需要往Word文档里填入诸如姓名.性别.成绩之类的固定数据,但这些数据却在Excel表格里,且相同的Word内容需要输入这种数据成千上万.比如像学生录取通知书.准考证.奖状.座位图 ...
最新文章
- WPF:跨应用程序会话保持和还原应用程序范围的属性
- 这三个Python小技巧你要知道
- 十大python开发软件-7款公认比较出色的Python IDE,你值得拥有!
- 听说你想去大厂看学妹,带你看看字节跳动后端开发面试长啥样?
- MyBatis 与 Hibernate 到底哪个更快?
- jQuery对象和DOM对象
- “睡服”面试官系列第十四篇之数组的扩展(建议收藏学习)
- Twisted SSH
- 2017.9.5.1.语文
- 《算法图解》——数组和链表
- tcp长连接java_聊聊 TCP 长连接和心跳那些事
- DevCpp 如何进行调试
- c++聊天机器人——简单版
- 快速指数(快速幂)/模指数运算代码模板
- java计算税后工资switch语句_switch语句 计算个人所得税和税后收入 | 学步园
- cityengine笔记
- minio 分片上传
- 自然语言处理在电商的技术实践
- GooglePhoto设置壁纸----壁纸裁剪界面配置
- 李三立院士逝世:中国计算机体系结构先驱,曾为国防计算机项目总负责人