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