如何通过从MS Word VBA UserForm运行的VBA（宏）在脱机模式下设置Outlook

Question

我正在尝试运行一个VBA代码，它应该让用户将文件附加到邮件合并功能中。

为了做到这一点，我需要将Outlook置于离线模式，以便在将任何文件附加到邮件之前将邮件保留在发件箱中。现在我想知道是否有一种方法可以从Word宏中将Outlook 2007置于脱机模式？

Answer 1

首先，添加对Outlook对象库的引用。如果Outlook已经打开：

Outlook.ActiveExplorer().CommandBars.FindControl(, 5613).Execute

如果Outlook已关闭：

Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")
olApp.GetNamespace("MAPI").Folders.GetFirst.GetExplorer.CommandBars.FindControl(, 5613).Execute