Insert rows fill formulas but not pictures

I foun this macro to insert rows and fill formulas, but it copies a picture that is on the previous row , and i do not want copy the pic. i appreciate if some one can help modifyng the following code to get worked

Please Login or Register  to view this content.