Copying data from sheet to sheet, workbook to workbook

My aim is to write a macro which will copy monthly data from the source, which is a workbook with data in multiple sheets, into my historic workbook which has the same multiple sheets but obviously the historic data as well.

So far I have managed to pull together some code which allow me to select the file, copy the range which will paste in the blank cell below the current data.

Please Login or Register  to view this content.

What I need is to write code so this happens to all sheets at the same time. Sheet1 to Sheet1, Sheet2 to Sheet2...... up to Sheet9 to Sheet9.

I am getting confused with how to Dimension the different sheets and would appreciate some help.

Do I need to dimension each sheet and repeat the code for every copy paste i want to do?