Highlight Property

Find object: True if highlight formatting is included in the find criteria. Can return or be set to True, False, or wdUndefined. Read/write Long.

Note  The wdUndefined value can be used with the Find object to ignore the state of highlight formatting in the selection or range that is searched.

Replacement object: True if highlight formatting is applied to the replacement text. Can return or be set to True, False, or wdUndefined. Read/write Long.

Example

This example finds all instances of highlighted text in the active document and removes the highlight formatting by setting the Highlight property of the Replacement object to False.

Dim rngTemp As Range

Set rngTemp = ActiveDocument.Range(Start:=0, End:=0)
With rngTemp.Find
    .ClearFormatting
    .Highlight = True
    With .Replacement
        .ClearFormatting
        .Highlight = False
    End With
    .Execute Replace:=wdReplaceAll, Forward:=True, FindText:="", _
         ReplaceWith:="", Format:=True
End With
		

This example applies highlight formatting to the next instance of bold text in the active document.

With Selection.Find
    .ClearFormatting
    .Font.Bold = True
    With .Replacement
        .ClearFormatting
        .Highlight = True
    End With
    .Execute Forward:=True, FindText:="", ReplaceWith:="", _
        Format:=True
End With