Macro running faster

Hi guys,  

I have a massive text replacement Macro, I would like to know if there is a way that I can optimize the Macro to run faster (i.e replace the text faster)?. Also, the document does not save or exit after I run the Macro. Thanks in advance