title: Creating and assigning tasks in Outlook from Excel
body: <p>I am attempting to create a service desk tool in Excel, and the way I am thinking of making it easy for the admin to assign them would be to use the tasks in Outlook.</p>
  
  <p>The admin person would receive the email, fill out a line in Excel, then click on a button to open a new task in Outlook, with fields pre-filled out. Then they would drag and drop the email as an attachment.</p>
  
  <p>However, I am trying to get the assigned to email address pre-filled from a value in the spreadsheet. Assign doesn't seem to work, and neither does Recipient. Does anyone have any ideas why not? This is the code that I have so far:</p>
  
  <pre><code>Dim OutApp As Outlook.Application
  Dim OutTask As Outlook.TaskItem
  
   Set OutApp = CreateObject("Outlook.Application")
   Set OutTask = OutApp.CreateItem(olTaskItem)
  
   With OutTask
      .Assign = Cells(2, "G")
      .Subject = "Service Request" &amp; Cells(2, "A")
      .StartDate = Cells(2, "H")
      .DueDate = Cells(2, "H") + Cells(2, "I")
      .ReminderTime = .DueDate - 1
      .Body = "Please see the attached email for a service request assigned to you."
      .Display
   End With
  
  Set OutTsk = Nothing
  Set OutApp = Nothing
  
  End Sub
  </code></pre>
  
  <p>Any help would be greatly appreciated!</p>