You can find a sample of a find and replace macro (in this case to replace the characters "><" with a paragraph mark) here:
The document is too large to save. - Microsoft Community
It clears most options.