FARM macro for whole-word replace (Chapter 3.2)

Post date: Feb 10, 2014 10:37:44 PM

With Selection.Find

.Text = "cld"

.Replacement.Text = "could"

.Forward = True

.Wrap = wdFindContinue

.Format = False

.MatchWholeWord = True

.MatchByte = False

.MatchWildcards = False

.MatchSoundsLike = False

.MatchAllWordForms = False

End With

Selection.Find.Execute Replace:=wdReplaceAll