Assigning a Task to a Colleague : Outlook Task « Outlook « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Outlook
3. Outlook Task

Assigning a Task to a Colleague

 
Sub taskItemTask()
    Dim myTaskAssignment As TaskItem
    Set myTaskAssignment = Application.CreateItem(ItemType:=olTaskItem)
    With myTaskAssignment
        .Assign
        .Recipients.Add Name:="Your Name"
        .Subject = "Body"
        .Body = "body."
        .DueDate = Str(Date + 3)
        .Send
    End With
End Sub

 

Related examples in the same category