title: Finding a date in message body and using it to set a reminder in outlook calendar
body: <p>Currently I have a macro running on all sent items to check that checks to see if I'm sending the e-mail to a particular customer. If I am, then it checks to see if one of the customer’s requirements for all messages is present which is a 'next update due' if it is not it asks if one is required. See below;</p>
  
  <pre><code>Public Sub application_ItemSend(ByVal Item As Object, Cancel As Boolean)
  Dim addrType
  Dim addr
  Dim recip
  
  For Each recip In Item.Recipients
  If recip.Type = olTo Then
      addrType = recip.PropertyAccessor.GetProperty("http://schemas.microsoft.com/mapi/proptag/0x3002001F")
          If addrType = "EX" Then
              addr = recip.AddressEntry.GetExchangeUser.PrimarySmtpAddress
          Else
              addr = recip.Address
          End If
  If LCase(addr) = "relevantemail1@outlook.com" Or LCase(addr) = "relevantemail2@outlook.com" Then
      If InStr(1, Item.Body, LCase("next update due"), vbTextCompare) &gt; 0 Then
  
          Call errhandler
          Else
          'ask if we've added the date
              prompt$ = "You're sending this to company x and have not added a 'next update due' date, do you need to add one?"
              If MsgBox(prompt$, vbYesNo + vbQuestion + vbMsgBoxSetForeground, "Check Address") = vbYes Then
                  Cancel = True
              End If
  Exit For
      End If
  End If
  End If
  Next
  
  End Sub
  </code></pre>
  
  <p>I am still really getting to grips with the basics of outlook VBA and string functions etc therein. so my question is: can I find the string after the text "next update due:" (ideally I want a formatted date but a string will do for the time being)? Essentially there will always be two delimiters ": " to begin the date and a carriage return to end it. Once I can retrieve it I am able to export the relevant information to an excel document which I will however I am struggling with the initial retrieval of the string/date. </p>
  
  <p>Hopefully you guys can help, more than happy to expand on the above code if needed.</p>