Problem with task creation

  • Thread starter Thread starter Daniel.C
  • Start date Start date
D

Daniel.C

OutLook 2007.
I'm creating tasks and I want to check off the "send me a status report
when this task is complete". So far, i found no property to do it.
Any help welcome.
 
There is no true/false setting like that for code. You have to use the
StatusUpdateRecipients and StatusOnCompletionRecipients strings or set up
the Recipients collection of the task item for that.

StatusOnCompletionRecipients is the Bcc set of recipients,
StatusUpdateRecipients are the Cc recipients.
 
Thanks, but it didn't work. Here is my code :

Set MyOutlook = CreateObject("Outlook.Application")
Set myTask = MyOutlook.CreateItem(3)
myTask.assign
With myTask
.Recipients.Add ("(e-mail address removed)")
.StatusOnCompletionRecipients = ""
.StatusOnCompletionRecipients = ""
.Display
End With
Set myTask = Nothing
Set MyOutlook = Nothing

Can you tell me what's wrong ?
TIA
 
Oops.
Set MyOutlook = CreateObject("Outlook.Application")
Set myTask = MyOutlook.CreateItem(3)
myTask.assign
With myTask
.Recipients.Add ("(e-mail address removed)")
.StatusOnCompletionRecipients = ""
.StatusUpdateRecipients = ""
.Display
End With
Set myTask = Nothing
Set MyOutlook = Nothing
TIA
 
Dim oRecipCC As Outlook.Recipient
Dim oRecipBCC As Outlook.Recipient

With myTask
' StatusUpdateRecipients
.Set oRecipCC = Recipients.Add ("(e-mail address removed)")
oRecipCC.Type = olCC
oRecipCC.Resolve

' StatusOnCompletionRecipients
Set oRecipBCC = Recipients.Add ("(e-mail address removed)")
oRecipBCC.Type = olBCC
oRecipBCC.Resolve

.Display
End With
 
Thanks for answering. I surely miss something. When I execute the code,
I display a task without main recipient and without send button.
Can you help me further more ?
Daniel
 
Back
Top