How to send mail to a category?

[michaaal]

How can I send mail to a category using VBA?

 

[michaaal]

Could you give me a simple example?

Just set the MailItem.Categories property (use comma-delimited values for
multiple categories).

 

[Guest]

If you want to do this for an open e-mail, use this code:

Sub AddCategoryToEmail()
Dim objMessage As Object
If ActiveInspector Is Nothing Then Exit Sub
Set objMessage = ActiveInspector.CurrentItem
objMessage.Categories = "My Category"
objMessage.Save
End Sub