VBA to add up Total # or rows to populate Destination sheet and insert More Rows if needed

I have a range on a sheet that populates the destination sheet. Right now I am adding additional rows to my input range but the problem is the user may use to many combined together to fit into the range on the destination sheet.

I have 6 Categories and at times you may have 2 choices selected in each column and at times your may need to increase that dramatically.

Right now my code reduces the blanks and groups everything together perfectly and as long as your don't have over 43 your good, but on the chance you need to use more I would like to know if the code can:

1. add the total number of rows that have been populated for the destination sheet
2. And if 44 or more it would take the additional amount and insert blank rows onto the destination sheet starting at row 52 and keep the formatting that is in place that way when they get populated the sheet is the way it is supposed to be.

My source sheet is the daily tab column 'B' and the destination sheet is the Job Ticket Tab.

Can this be done?