从 Excel 更新 Outlook 邮件类别答案

【问题标题】：Update Outlook Mail categories from Excel从 Excel 更新 Outlook 邮件类别
【发布时间】：2021-11-28 20:22:07
【问题描述】：

我正在通过 Excel 访问 Outlook，因为我的企业 Outlook VBA 已被禁用。我专门迭代我的收件箱并更新 Mail.object 类别属性。

Dim objOutlook As Object
Set ObjOUtlook =CreateObject("Outlook.Application")

Dim objNSpace As object
Set ObjNSpace = objNaspace.GetDefaultFolder(olFolderInbox)

Dim myFolder As Object
Set myFolder= objNSpace.GetDefaultFolder(olFolderInbox)

Dim myItems As Outlook.Items
Set myItems = myFolder.Items

For Each objItem In myFolder.items
Dim objMail As Outlook.MailItem
set objMail = objItem

objMail.Categories = "Blue"
objMail.Save

这给出了图片中的蓝色类别，但我希望能够使用橙色类别格式进行更新。

这可以通过excel VBA实现吗？

【问题讨论】：

你的意思是要改变颜色？

标签： excel vba outlook categories mailitem

【解决方案1】：

除非你有什么奇怪的事情发生在这里，你只需改变这一行：

objMail.Categories = "Blue"

到

objMail.Categories = "Orange Category"

双引号中的名称必须与您在 Outlook 中设置的名称完全相同 - 即区分大小写。

【讨论】：