Code to add rows and continue formulas needs tweaking

Im trying to make some code to add new rows below the active cell (user defined) and continue the formulas in columns A, B, C and F. I found the following code online which does this but it needs some tweaking:

Please Login or Register  to view this content.

The main issue I have with it is it seems like it duplicates the values in the newly created rows first, then the values get erased. I have a change event code for this sheet which is interrupting this process. Is it possible to have the code simply duplicate the formulas to the new rows while keeping the values blank in each cell at all times (this would prevent my change event code from triggering and interrupting)
Also it seems as if it appears to be searching for values/formulas to duplicate on the entire row (which must be slowing the process down). My records just go to K, and the formulas I want to copy down are just in columns A, B, C and F. Can it be set to only duplicate the formulas from these columns to save time?

Most of the time the code will be used to add rows in between existing records.