FARM macro for replace down (Chapter 3.2)

posted Feb 10, 2014, 2:31 PM by Wolf O'Rourc
With Selection.Find
    .Text = "xdc"
    .Replacement.Text = "Washington, DC"
    .Forward = True
    .Wrap = WdFindStop
    .Format = False
    .MatchWholeWord = True
    .MatchByte = False
    .MatchWildcards = False
    .MatchSoundsLike = False
    .MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
Comments