Thank you for this, gmaxey! It works perfectly. I'm going to use this to create a lotttt of contingency factors for my documents. Instead of just rerunning this whole code over and over, can I just repeatedly use With oRng.Find after End With each time within the function?

I've gone ahead and just created sub functions for each new string value. I think this will work now.