Send email med autosignatur

Jeg bruger følgende kode til at sende en email.
Det fungerer fint, bortset fra at formateringen i min autosignatur bliver ændret.

Private Sub cmdEmail_Click()
  Dim objOl As New Outlook.Application
  Dim objPost As MailItem
  Dim vedhæftet As Attachments
  Set objPost = objOl.CreateItem(olMailItem)
  Set vedhæftet = objPost.Attachments
  'vedhæftet.Add "C:\test.txt"
  With objPost
      .Subject = "Subject goes here"
      .To = "eksperten@NOSPAMsanthell.dk"
      .Display
      .Body = "Body of text goes here" & .Body
  End With
  Set objPost = Nothing
  Set vedhæftet = Nothing
End Sub

Koden er taget fra
http://www.eksperten.dk/spm/594901

Hvordan beholder jeg formateringen i autosignaturen?
Fed skrift, understregning osv.