Copy data then remove unused rows

I am working on a workbook for my company and need a little help with some coding. There is some data that will be imported into "Insert Data 1" tab. I need that data copied into the "Insert Data 2" tab starting in cell A1.

From there the dta will be populated in the first tab "Expense Report." After the data has been populated, I need the blanks row deleted, starting with row 63 and moving up until al of the blank rows have been removed. The search for the blank cell can be done on column F "total amount."

Can this be done with the existing formulas in the "expense Report" tab or would they need to be changed to an =IF( , ) style fomula to provide you a blank cell to count?

I would also like all of this coding to be executed from a button on the top of the "expense report" tab.