vba - 在选择上使用 VBA 设置类别在 Outlook 2007 中似乎不起作用

Question

我正在尝试为当前选择设置邮件消息类别。当我运行宏时，我最终只会将一条消息设置为给定的类别。我使用以下代码(并且还尝试使用 do until..loop 使用 selection.count ):

Sub SetSelectionComplete()
    Dim mailMsg As MailItem

    For Each mailMsg In Outlook.Application.ActiveExplorer.Selection
        mailMsg.Categories = "Complete"
    Next

End Sub

有任何想法吗？

Answer 1

保存 mailMsg 每次都有项目，像这样:

Sub SetSelectionComplete()
    Dim mailMsg As MailItem
    For Each mailMsg In Outlook.Application.ActiveExplorer.Selection
        mailMsg.Categories = "Complete"
        mailMsg.Save
    Next
End Sub