excel vba find and replace text in word document

Beauticians