View Single Post
 
Old 02-18-2013, 01:53 AM
norgro norgro is offline Windows XP Office 2007
Novice
 
Join Date: Feb 2013
Location: Perh Australia
Posts: 12
norgro is on a distinguished road
Default Highlight only the characters ER when it occurs in SEVERE.

I am creating a macro to assist with the teaching of Braille for the sighted.

The aim is to highlight in a Word document every occurrence of the characters ER, but only when they occur in the word SEVERE.

I have written code to find occurrences of SEVERE, but I cannot work out how to highlight only the letters ER in every occurrence of the word SEVERE.

If someone can help, I would be very grateful.

The code, as far as I have gone at this stage:
Code:
Sub Highlight_ER_in_SEVERE()
'
'Search for "severe". Highlight only the letters "er".
Set oRng = ActiveDocument.Range
With oRng.Find
  .MatchWholeWord = True
  .Text = "severe"
  .Wrap = wdFindStop 'stops at the end of the document
  While .Execute
    oRng.HighlightColorIndex = wdGreen
  Wend
End With
End Sub

Last edited by macropod; 02-18-2013 at 04:16 AM. Reason: Added code tags & formatting
Reply With Quote