I like Outlook feature of combining tasks and marked as task emails in a
single task view. I can change status of tasks and THESE EMAILS in a table
view.

If I send an email and I flag it then it means for me that the status of
this Task should be set to olTaskWaiting. I do it manualy in a task view but
I decided to create a code snippet to change the status automatically.

I catch ItemAdd event in SentMail folder:

Private Sub myOlItems_ItemAdd(ByVal Item As Object)
If Item.FlagStatus = olFlagMarked Then
Item.Status = olTaskWaiting ' ERROR!
End If
End Sub


When I send a marked email I get an error message" "Object doesn't support
this property or method.". It isn't actually suprising cause MailItem object
doesn't support Status property. How could I change Status of my marked as
tasks emails using VBA?

Outlook 2007, WIN 7

Get the MailItem.PropertyAccessor object and use
PropertyAccessor.SetProperty("http://schemas.microsoft.com/mapi/id/{00062003-0000-0000-C000-000000000046}/81010003")
to set the value you want, which would be a Long.

Note that the property tag value supplied for Status is a DASL property tag
string and not an URL.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007.
Reminder Manager, Extended Reminders, Attachment Options.
http://www.slovaktech.com/products.htm


"kradam" <(E-Mail Removed)> wrote in message
news:C809DC16-EDD9-456A-B963-(E-Mail Removed)...
>I like Outlook feature of combining tasks and marked as task emails in a
> single task view. I can change status of tasks and THESE EMAILS in a table
> view.
>
> If I send an email and I flag it then it means for me that the status of
> this Task should be set to olTaskWaiting. I do it manualy in a task view
> but
> I decided to create a code snippet to change the status automatically.
>
> I catch ItemAdd event in SentMail folder:
>
> Private Sub myOlItems_ItemAdd(ByVal Item As Object)
> If Item.FlagStatus = olFlagMarked Then
> Item.Status = olTaskWaiting ' ERROR!
> End If
> End Sub
>
>
> When I send a marked email I get an error message" "Object doesn't support
> this property or method.". It isn't actually suprising cause MailItem
> object
> doesn't support Status property. How could I change Status of my marked as
> tasks emails using VBA?
>
> Outlook 2007, WIN 7

Thank you Ken, it was very helpful