Use this Macro and add it to the ribbon as a button. Presto! Categories work for IMAP mail. Of course, they're not synchronized to the server, but they'll stick in the local PST file for your IMAP account.
Public Sub Categorize()
Dim sel As Outlook.Selection
Set sel = Application.ActiveExplorer.Selection
If sel Is Nothing Then
Exit Sub
End If
Dim obj As Object
Dim selCats As String
Dim gotCats As Boolean
For Each obj In sel
If Not gotCats Then
obj.ShowCategoriesDialog
selCats = obj.Categories
gotCats = True
Else
' ShowCategoriesDialog updates the first one free of charge.
' We handle the remaining selected items ourselves.
obj.Categories = selCats
obj.Save
End If
Next obj
End Sub
I wrote a COM add-in to sync categories with IMAP servers that support custom flags, but I'm not going to share it. That'd only give MSFT an excuse to further delay implementing this themselves.
Hi, as there s still no solution from MS for the missing category sync i would like to ask you, if you may share the COM add-in? – Stephan – 2017-01-22T13:51:20.150
Hi "Display Name must be at least". I have tested your macro that works. Nice job. However i want to ask you if you please can share your server sync script with me. That would be helpful to me because we are i a big need of categorizing imap emails. Thanks in advance. please answer to jonas@infomentor.se – None – 2012-06-26T09:32:34.840