☰

Outlook - 如何在 VBA 宏中获取 MailItem 的文件夹名称

tag-icon • tag-icon microsoft-outlook vba macros
Outlook - 如何在 VBA 宏中获取 MailItem 的文件夹名称

我有一个 Outlook VBA 宏，我想在其中检查给定的 MailItem 对象是否属于特定的 Outlook 文件夹。有什么方法可以实现这一点吗？我可以使用

Set objFolder = objFolder.Folders("Inbox").Folders("FOLDER_NAME")

获取我想要检查我的项目所属的文件夹，但我不知道如何直接将我的 MailItem 与该对象进行比较。

答案1

不确定为什么这个之前不起作用，但是我只是尝试比较，objFolder.Folders("Inbox").Folders("FOLDER_NAME")现在Item.Parent比较有效了，之前它给了我一个错误，但现在它可以工作了，所以这个问题应该解决了。

以下是我的宏，适用于将来可能遇到此问题的人：

Public Sub Do_Stuff_To_Items(Item As Outlook.MailItem)
    On Error Resume Next
    Dim objNS As Outlook.NameSpace
    Dim objFolder As Outlook.MAPIFolder

    Set objNS = GetNamespace("MAPI")
    Set objFolder = objNS.Folders.GetFirst ' folders of your current account
    Set objFolder = objFolder.Folders("Inbox").Folders("FOLDER_NAME")
    If Item.Parent = objFolder Then
        ' Do Stuff
    End If
End Sub

相关内容