Insert New Rows to Table based on cell value

On the attached example, I would like to click the command button and the code would insert the number of rows specified by cell BA2 to the next blank row (13 in this case). I then need the code to copy down the formulas and values of columns J:M in these 3 new rows in the table.Then the same in columns Q:S.

I have added a second worksheet (After) to show how I expect the first worksheet (Before) to look after running the code. Hope this helps to explain.