Outlook: Unterschiedliche Nachverfolgungs-Icons per VBA

[Snooty]

Hio,

ich möchte in Outlook Nachrichten per VBA zur Nachverfolgung kennzeichnen.

Wenn ich das händisch mache, sieht die Kennzeichnung so aus:

Per VBA sieht das Fähnchen so aus:

a) was ist denn der Unterschied der beiden Markierungen und b) wie kann ich den selben Zustand wie das manuelle Setzen per VBA erreichen?

Gesetzt habe ich die Flagge mit .FlagStatus = olFlagMarked und auch mal mit .FlagRequest = "Follow up" mit demselben Resultat.

 

[Janush]

versuchs mal mit

.MarkAsTask olMarkNoDate
.FlagStatus = olFlagMarked

Bei mir funktioniert mal und mal nicht....ganz komisch. Manchmal gehts dann nichmal manuell anzupassen....musst halt mal n bisschen probieren.

Sub test()

Dim i As MailItem

Set i = Outlook.ActiveExplorer.CurrentFolder.Items.GetLast

With i
    .MarkAsTask olMarkNoDate
    .FlagStatus = olFlagMarked
    .FlagRequest = "VBA Flag"
    
    '.ClearTaskFlag
    '.FlagIcon = olNoFlagIcon
End With

Set i = Nothing
End Sub

Wenn du bei With i einen break point setzt, kannst du dir im local window alle Eigenschaften des Mail Items anschauen und so eventuell noch mehr herausfinden :-)

 

[Snooty]

Danke, das klappt.