title: Change the format in text pasted to Outlook
body: <p>I am trying to change the text so certain values from cells are either bold, underlined, red, or otherwise stand out from the surrounding text in the body of the email.</p>
  
  <p>How can I do that?</p>
  
  <pre><code>For i = 10 To 18
      If Not Cells(i, "A").Text = vbNullString Then
          'Add to growing string
          concatString = concatString + Cells(i, "A").Text &amp; ", " &amp; _
            Cells(i, "B").Text &amp; vbCr
          concatString = concatString + "Assignment/Zone: " &amp; _
            Cells(i, "C").Text &amp; vbNewLine &amp; vbCr
      End If
  Next i
  
  myMail.Body = Range("B2") &amp; " Shift" &amp; "  -  " &amp; Format(Date, "mmmm dd, yyyy") _
      &amp; vbNewLine &amp; vbNewLine &amp; "Sergeant: " &amp; Range("A6") &amp; ", " &amp; Range("B6") &amp; _
      vbNewLine &amp; "          Status: " &amp; Range("C6") _
      &amp; vbNewLine &amp; vbNewLine &amp; "Corporal: " &amp; Range("A8") &amp; ", " &amp; Range("B8") &amp; _
      vbNewLine &amp; "          Status: " &amp; Range("C8") _
      &amp; vbNewLine &amp; vbNewLine &amp; "Assigned Deputies" &amp; vbNewLine &amp; vbNewLine &amp; concatString
  </code></pre>