MatchSoundsLike Property Example
This example selects the next word that sounds like the word "fun" (for instance, "funny") in the selection.
With Selection.Find
.ClearFormatting
.Text = "fun"
.MatchFuzzy = False
.MatchSoundsLike = True
.Execute Format:=False, Forward:=True, Wrap:=wdFindContinue
End With