oWord.Selection.Find.ClearFormatting oWord.Selection.Find.Replacement.ClearFormatting WITH oWord.Selection.Find .Text = tcSearchFor .Replacement.Text = tcReplaceWith .Forward = True .Wrap = wdFindContinue .Format = False .MatchCase = False .MatchWholeWord = False .MatchWildcards = False .MatchSoundsLike = False .MatchAllWordForms = False EndWith the last line looks liki oWord.Selection.Find.Execute Replace:=wdReplaceAllIt's nice that VB has named parameters but VFP does not. After doing a little research I found that Execute has 11 parameters. The 11th Parameter the Replace parameter can not be defined up the find block.