如何通过从 MS Word VBA 用户窗体运行的 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