写入活动 Outlook 文件夹

Question

我希望 Excel 使用 VBA 在 Outlook 的活动文件夹中写入。但我什至很难定义当前活动文件夹的路径。

这是我尝试使用的代码：

 Sub Test_folder_path()
     Dim myFolder As Object
     Set myFolder = Application.ActiveExplorer.CurrentFolder
 End Sub

我得到的错误是

Error 438: ("Object Doesn’t Support this Property or Method")

如果我尝试为

myfolder

定义其他类型，

Set myfolder

会要求一个对象。

如果有任何建议，我会非常高兴，因为我几个小时以来一直在寻找解决方案！

我正在使用 Office 2021。

Answer 1

要从 VBA-Excel 使用 MS Outlook，您需要后期绑定或早期绑定。

在您的示例中，

Application

将指的是 MS Excel，而不是 MS Outlook。

这是一个例子

Option Explicit

Sub Test_folder_path()
    Dim OutApp As Object
    Set OutApp = CreateObject("Outlook.Application")

    Dim myFolder As Object
    Set myFolder = OutApp.ActiveExplorer.CurrentFolder
    
    MsgBox myFolder.Name
End Sub

我建议阅读在自动化中使用早期绑定和后期绑定