Vba Outlook categorie toevoegen aan mail

[bontekite]

Hallo ,

Ik ben bezig met een macro, maar ik krijg het niet voor elkaar om alleen de categorie bijvoorbeeld rood met de tekst in de balk "Mail gekopieerd"

Sub categorie()
Dim Messages As Selection
Dim Msg As MailItem
Set Messages = ActiveExplorer.Selection

If Messages.Count = 0 Then
Exit Sub
End If
For Each Msg In Messages

With Msg
.FlagStatus = 8
' .MarkAsTask olMarkNoDate
'.MarkAsTask olMarkComplete
.FlagRequest = "Aangepast"
.save
End With
Next
End Sub

ik krijg wel een opmerking in de balk dat het "geen categorie is en gekleurd is met een 2003 vlag: Rood)

en ik werk met 2010


wie kan mij hiermee helpen

groeten
Ben

 

[OctaFish]

Ik weet het: het is laat, maar code graag opmaken met de CODE knop, dan is de structuur wat beter te zien .

 

[OctaFish]

Zoek je de CODE knop nog steeds, of is je vraag inmiddels opgelost? Ik zit nog eens naar je vraag en naar je code te kijken, en ik zie eerlijk gezegd niet wat je nu precies vraagt.

Ik ben bezig met een macro, maar ik krijg het niet voor elkaar om alleen de categorie bijvoorbeeld rood met de tekst in de balk "Mail gekopieerd"

Dit is geen vraag volgens mij, althans niet een complete. En ik zie hier niets van terug in je code. Dus wat wil je eigenlijk?