Excel VBA – 发送MailMerge到打印机

我想扩展与这个问题相关的function。 有没有办法将它设置为发送MailMerge到打印机,而不是创build一个新的文件?

我想你可以使用与你的链接中列出的相同的代码,但是添加一行来打印生成的单词文档。 我不熟悉单词的语法,但这应该工作(或至less让你开始)。

更换:

 wd.Visible = True wdocSource.Close SaveChanges:=False 

附:

 wd.Visible = True wdocSource.print wdocSource.Close SaveChanges:=False