你的这个要求不适合用 Word 的邮件合并功能!你可以借鉴机打支票的模式。
1、假设你的数据在 Excel 的 Sheet1 表中。Sheet1 表设计如下图:
其中:在第2行与第3行之间冻结窗格,以便数据增加后能够始终显示打印份数、行号和打印按钮。
2、把 Word 文档的内容放到 Excel 的 Sheet2 表中,通过单元格合并及合适的行高、列宽等设置,尽量把 Sheet2 的内容设置为满意的打印版面。
3、编写打印按钮的vba代码。代码大概过程为:先根据打印行号把 Sheet1 表中对应行的值写入
Sheet2 表的相应位置;然后根据指定的打印份数开始打印 Sheet2 表。
当然,代码中可以添加如果行号、份数为空的判断,以及要打印行任意一个数据为空的情况判断。
大概就这么多了,由于不知道你的 Word 文档转为 Sheet2 表后的具体格式,无法写具体代码。。
不过,其实代码也不是很复杂,自己搜索下,实在不会了可以再来提问。。
温馨提示:答案为网友推荐,仅供参考