Word批量生成邀请函并用域命名，批量转PDF

micro office word 2019

就是邮件合并，这里就不细讲了

值得一提的是，如果用WPS邮件合并，所用的现有数据源要是.xls格式，micro office excel会显示打不开

在邮件合并第四步撰写信函这里开始：

写好需要的信函之后，在最开头加一行文字，并设置为标题1，内容是想要给文件取的名字，在这里插入合并域

例如我希望文件以姓名命名：

然后把加的这一行字号调到1号（最小号），打开段落对话框设置段前段后都为0，行距为固定值1磅，字体颜色调为和背景一个颜色，一般为白色

效果就是绿框所示，

这里是黑线是因为我选中了文字，左边的小黑点是因为段落设置里面自动设置了换行和分页，取消查看段落标记就看不到了，转出的PDF里面也不会有，所以不影响。想要单独删掉这个的话，选中这一行后打开段落对话框，在换行和分页下的分页里几个选项全都不选就可以了。

然后在文档的末尾打几个字符，例如123，能够跟正文区分开，查找替换的时候不会查到正文里面去即可，例如123

以上是为后面的步骤做准备，原因后面会说，接下来是重点步骤：

点击完成邮件合并下的编辑单个文档

然后会弹出一个包含所有邀请函的word文档，在这个文档里进行以下操作：

打开视图→大纲

显示1级标题，这里就会只显示我们之前在最前面新加的那一行（前提是原文档里面没有用标题1 的段落）

然后Ctrl+A全选，点击显示文档→创建

得到这个

这里需要注意了，为了最后生成的单个文档没有空白页，在这里需要把分节符去掉，操作如下：

把显示级别调为全部显示，Ctrl+H调出替换对话框，更多→特殊格式里面找，把分节符全部换成段落标记，全部替换

所以前面在文档里面加123的目的就是给文档末尾他自动加上去的分页符定位，定位后就可以替换并且不影响正文中的分页符了。

这里验证操作是否正确的方法就是看它显示替换了多少处，正确的话就是替换数量和你要生成的邀请函数量一致

操作完之后，点击文件→另存为→找个存邀请函的位置→命名为拆分（也可以是其他的，不重要）→保存，等word运行完之后，在保存路径下就可以看到一个叫拆分的word以及大量你需要的邀请函了。

这里要用到宏

因为是其他人的代码，链接我放在最后了

随便打开一个word文档，视图→宏→查看宏→创建→里面原有的代码框架全都删掉，复制链接里人写好的代码→修改路径→运行

然后静静等待即可

他会在你给的路径下这个文件夹里所有的word全部转成PDF，所以把需要转的word单独放在一个文件夹里，如果在这个文件夹里重复运行这个宏，同名的新生成的PDF会覆盖原来的PDF。

这个宏用一次之后会自动保存，下次可以直接用，宏→查看宏→找到这个宏（名字就叫做wordToPdf）→选中（别双击，否则就直接在上次的文件夹里运行了）→编辑→修改文件夹位置即可

代码链接：

word批量转换pdf_不吃鱼的小熊的博客-CSDN博客