Also, this set just seems to be a throw-away, since nothing is done with it


[vba]
Set oTemp = oText.Replace(BeforeText, AfterText, , WholeWords, MatchCase[/vba]

Paul