How to move custom Tasks columns to another Person

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I would like to move Tasks from a Task list in Outlook to another user and
include some User Defined Columns. Any Ideas. Export the tasks and import
somehow or VBA sample code would be apprecated
 
If you defined these fields at the folder level, they will not travel with
the Task Item. You would need to define them in a custom Task form before
the other user can see it. Given that requirement, plus the custom form
being published in the other user Task folder forms library (or Personal or
Organization forms libraries), then you can use this code if the other user
has delegated write access to their Task folder to you:

Dim myNamespace As Outlook.NameSpace
Dim myRecipient As Outlook.Recipient
Dim myFolder As Outlook.MAPIFolder
Dim myTask As Outlook.TaskItem
Dim myCopiedTask As Outlook.TaskItem

Set myOlApp = CreateObject("Outlook.Application")
Set myNamespace = myOlApp.GetNamespace("MAPI")
Set myRecipient = myNamespace.CreateRecipient("Some User")
Set myTask = myOlApp.ActiveInspector 'Assumes the Task you want to copy is
open

myRecipient.Resolve
If myRecipient.Resolved Then
Set myFolder = myNamespace.GetSharedDefaultFolder(myRecipient,
olFolderTasks)
Set myCopiedTask = myTask.Copy
myCopiedTask.Move myFolder
End If
 
Back
Top