Need help with looping issue

I created a macro with the intent to insert 10 blank lines every 79 rows, then enter some text in those rows, and then force a page break. I want it to loop through all the rows in the file, but it just seems to be looping on the inserting of lines after the initial insertion of blank rows. Please see the macro in the attached file and let me know what I'm doing wrong. The uploaded file shows the correct first loop through. I did comment out the looping statements. You can change them to statements and see the results.

Thanks, Sharon