Solved

How do I highlight text in a message body with VBA?

Posted on 2009-07-13
1
1,814 Views
Last Modified: 2013-11-05
Hello,

My task is to compare the bodies of two messages using VBA and highlight the text of the second message where the values are different. I am using the following code to split the lines of the message bodies into string arrays using the Split function and then loop through the lines and compare them. I am attempting to enclose each line with <div> tags and apply a style to change the text color. I later set the BodyFormat property to olFormatHTML when I send the final message but the resultant markup is displayed in the message. Is there another possible solution to this problem?
Dim beginRedDiv As String, beginBlackDiv As String, endDiv As String
    beginRedDiv = "<div style='color:red;'>"
    beginBlackDiv = "<div style='color:black;'>"
    endDiv = "</div>"
    
    Dim oldUpdateMessageBody() As String, newUpdateMessageBody As String, newTranscriptionMessageBody() As String
    
    oldUpdateMessageBody = Split(OriginalMessage.Body, vbCrLf)
    newTranscriptionMessageBody = Split(mUpdateMatchMessage.Body, vbCrLf)
    
    Dim i As Integer
    For i = 0 To UBound(oldUpdateMessageBody)
        If oldUpdateMessageBody(i) <> newTranscriptionMessageBody(i) Then
            newUpdateMessageBody = newUpdateMessageBody & beginRedDiv & oldUpdateMessageBody(i) & endDiv
        Else
            newUpdateMessageBody = newUpdateMessageBody & beginBlackDiv & oldUpdateMessageBody(i) & endDiv
        End If
    Next

Open in new window

0
Comment
Question by:Curto123
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
1 Comment
 

Accepted Solution

by:
Curto123 earned 0 total points
ID: 24843935
I seem to have found the solution on my own. I just needed to dig a little more. It seems all I needed to was use the HTMLBody property of the final message instead of the Body property. My text is now colored appropriately.
0

Featured Post

Salesforce Has Never Been Easier

Improve and reinforce salesforce training & adoption using WalkMe's digital adoption platform. Start saving on costly employee training by creating fast intuitive Walk-Thrus for Salesforce. Claim your Free Account Now

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

MS Outlook is a world-class email client application that is mainly used for e-communication globally.  In this article, we will discuss the basic idea about MS Outlook, its advanced features, and types of MS Outlook File formats.
You need to know the location of the Office templates folder, so that when you create new templates, they are saved to that location, and thus are available for selection when creating new documents.  The steps to find the Templates folder path are …
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
There are cases when e.g. an IT administrator wants to have full access and view into selected mailboxes on Exchange server, directly from his own email account in Outlook or Outlook Web Access. This proves useful when for example administrator want…

728 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question