如何通过从MS Word VBA用户表单运行的VBA(宏)在脱机模式下设置Outlook

Question

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

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

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