excel - Outlook GetNamespace（“MAPI”）的VBA Excel运行时错误

Question

我正在尝试开始使用一些基本代码。我安装了 Microsoft Office 2013。在 Excel 中，我创建了一个 VBA 模块，代码如下。我选择了“Microsoft Outlook 15.0 对象库”作为包含的参考。当执行到第 5 行时，它会抛出一个

运行时错误“-2147024809 (80070057)”：抱歉出了点问题。您可能想再试一次。

我不确定为什么会这样。任何建议将不胜感激。先感谢您！

1：子GetFromOutlook()

2：将 OutlookApp 调暗为 Outlook.Application

3：将 OutlookNamespace 调暗为命名空间

4：设置 OutlookApp = 新建 Outlook.Application

5：设置 OutlookNamespace = OutlookApp.GetNamespace("MAPI")

6：设置 OutlookNamespace = 无

7：设置 OutlookApp = 无

8：结束子

标签： exceloutlook