This example searches for the term "" in the specified range without distinguishing between full-width and half-width characters.
With Selection.Find
.ClearFormatting
.MatchWholeWord = True
.MatchByte = False
.Execute FindText:=""
End With