Message settings

[Milton Garcia]

Hi, I would like to know the VB code needed to, once I
have selected a group of email messages, change the
message settings from "High" to "Normal". Currently I was
able to do that in a message by message basis. Thanks.

 

[Ken Slovak - [MVP - Outlook]]

Selected in the UI? That would be the ActiveExplorer.Selection
collection. Use code something like this:
Dim oMail As Outlook.MailItem
Dim oApp As Outlook.Application

Set oApp = CreateObject("Outlook.Application")
'for Outlook VBA just use Application instead of oApp
For Each oMail In oApp.ActiveExplorer.Selection
oMail.Importance = olImportanceNormal
oMail.Save
Next