2 Quick Methods to Replace the Font of Specific Text in an Outlook Email

When you compose an email, you may want to change the font of the specific text to highlight the specific text. This article will teach you how to quickly accomplish it by 2 means.

In order to highlight important information when composing an email, at times, you may hope to make specific text stand out by showing it in the different fonts. Here we will expose 2 quick methods to you.

Replace the Font of Specific Text in an Outlook Email

Method 1: Replace the Font of Specific Text via “Replace” Feature

  1. At the very outset, compose an email as usual.
  2. Then turn to “Format Text” tab.
  3. Subsequently, click the “Replace” button in “Editing” group.
  4. Next in the popup dialog box of “Find and Replace”, you can enter the texts whose font you want to change in “Find what” and “Replace with”.
  5. And then click “More”.click “More”
  6. Now click the “Format” button at bottom and choose “Font”.click the “Format” button
  7. After that, in the next popup dialog box, specify the font style.Replace Font
  8. Eventually click several “OK” to start “find” and “replace”.

Method 2: Replace the Font of Specific Text via Outlook VBA

  1. In the first place, you should launch your Outlook program properly.
  2. After getting into the main Outlook window, press “Alt + F11” key shortcuts.
  3. Then you will enter Outlook VBA editor successfully.
  4. Next you need to open a module which is not in use or directly insert a new module.
  5. Subsequently, you ought to copy and paste the following VBA codes into the module.
Sub ChangeFontStyleSpecificTextsinanEmail()
    Dim objMail As Outlook.MailItem
    Dim objInspector As Outlook.Inspector
    Dim objWordApp As Word.Application
    Dim objDocument As Word.Document
    Dim objWordSelection As Word.Selection
 
    Set objMail = Outlook.Application.ActiveInspector.CurrentItem
 
    'Ensure the current item is an email
    If TypeOf objMail Is MailItem Then
       'Access the word editor for Outlook email
       Set objInspector = objMail.GetInspector
       If objInspector.EditorType = olEditorWord Then
          Set objDocument = objInspector.WordEditor
          Set objWordApp = objDocument.Application
          Set objWordSelection = objWordApp.Selection

          With objWordSelection.Find
               'Specify what texts to be searched
               .Text = InputBox("Enter the specific texts whose font style you want to change.(Case Sensitive)")
               .Forward = True
               .Wrap = wdFindContinue
               .MatchCase = True
          End With
 
          objWordSelection.Find.ClearFormatting
          objWordSelection.Find.Replacement.ClearFormatting
 
          'Specify the font style of the specific texts
          'You can change the font style as per your needs
          With objWordSelection.Find.Replacement.Font
              .Name = "Times New Roman"
              .Color = wdColorRed
              .Size = 18
              .Bold = True
          End With
 
          'Excute the actions of "find" and "change"
          objWordSelection.Find.Execute Replace:=wdReplaceAll
        End If
    End If
End Sub

VBA Codes - Replace the Font of Specific Text

  1. After that, you can close the VBA editor window.
  2. Later you should add the new macro to the Quick Access Toolbar of Message window, instead of the main Outlook window.
  3. Finally you can have a try.
  • Firstly, open a new email and compose the email as usual.
  • Then click the according macro button in the Quick Access Toolbar.Click the according macro button in the Quick Access Toolbar
  • Next, you will see an input box, in which you need to enter the specific texts whose font style you want to change.Enter the specific text
  • After that, you can press “Enter” key button.
  • Finally, all the specific texts will be changed to the specific font style that you’ve preset in the VBA codes.Replace the Font of Specific Text Successfully

Make Efforts to Avert PST Corruption

Since Outlook is error prone, you should spend a great amount of efforts to avoid PST damage. The most effective way to prevent Outlook data loss is to make a consistent and up-to-date data backup for Outlook PST. In addition, it is also wise to get hold of a potent repair tool, such as DataNumen Outlook Repair, which will come in handy.

Author Introduction:

Shirley Zhang is a data recovery expert in DataNumen, Inc., which is the world leader in data recovery technologies, including repair SQL Server and outlook repair software products. For more information visit www.datanumen.com

Comments are closed.