Specify Outlook 2010 Category Color

[trevorwilliams2]

Based on a user selection in an Access (2010) form I am trying to change color of an Outlook email category.

Working the Outlook mailItem I am trying to do the following:

If Forms!frmTreeViewFull!TextFlagColor = "Red" Then
currentMail.Categories = olCategoryColorRed
currentMail.Save
End If

The problem is that instead of changing the category color it returns the numeric value associated with the color.

I must have the syntax off here someplace...

Any suggestions would be apreciated

 

[trevorwilliams2]

Answer to my own question. You have to specify the category by its name / string value

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