ClearAllFuzzyOptions Method Example

This example clears all nonspecific options before executing a search in the selected range. If the word "" is formatted as bold, the entire paragraph will be selected and copied to the Clipboard.

With Selection.Find
    .ClearFormatting
    .ClearAllFuzzyOptions
    .Font.Bold = True
    .Execute FindText:="", Format:=True, Forward:=True
    If .Found = True Then
        .Parent.Expand Unit:=wdParagraph
        .Parent.Copy
    End If
End With