使用Outlook 2007中的VBA以编程方式打印文档

Question

我正在寻找一种在Outlook宏中使用VBA以编程方式打印Word文档的方法。我认为可能有两种方法可以实现这一目标：

1）使用Shell通过Word命令行开关打印文档。

2）使用Outlook打印文档。

有办法做到这一点吗？我需要能够指定打印机。

谢谢！

Answer 1

确定。经过一些Google-ing，这就是它的完成方式：

Dim WordObject As Object
Dim DocumentObject As Object

Set WordObject = CreateObject("Word.Application")
WordObject.Visible = True //Specifies if you want the actual window to appear

Set DocumentObject = WordObject.Documents.Open("File Name Here")
WordObject.ActivePrinter = "Printer Name Here"
WordObject.PrintOut (True) //Set to True to print in the background

资料来源：http://msdn.microsoft.com/en-us/library/bb213458.aspx

Answer 2

我认为您应该能够使用word对象以编程方式调用打印功能。我知道我们确实以编程方式使用excel类，所以我猜你也应该能够说出来。