title: Mail range with formatting through vba in excel
body: <p>there are lot`s of articles in the web, how to pass excel range in the outlook mail. So i am using the following code:</p>
  
  <pre><code>Set OutApp = GetObject(, "Outlook.Application")
  If OutApp Is Nothing Then Set OutApp = CreateObject("Outlook.Application")
  Set OutMail = OutApp.CreateItem(0)
  Set rng = Sheets("Report").Range("A3:F" &amp; ThisWorkbook.Worksheets("Report").UsedRange.Rows.Count)
  
  With OutMail
      .HTMLBody = RangetoHTML(rng)   
      .Display
  End With
  </code></pre>
  
  <p>In my range i have table of hyperlinks. And i want them to be clickable in the email body. But they are not. I understand this, because the BodyFormat propherty is olFormatHTML. And if i change the BodyFormat to Plain or RichText,  hyperlinks become clickable but all the formatting crashes. How can i save all the formatting and make hyperlinks clickable in the same time?</p>
  
  <p>Thanks for your help!</p>