FARM macro for whole-word replace (Chapter 3.2)

posted Feb 10, 2014, 2:37 PM by Wolf O'Rourc
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
Comments