VBA: Populate Data from Multiple Worksheets

[quanweitkd]

Need help to create a macro to extract the following data (highlighted in green) from Multiple Worksheets onto the Summary sheet:

• Month of Report onto E1
• Date of Report onto E2
• Carpark ID on column D
• Carpark ID + Lane ID onto column E
• Percentages for Hourly, Season Parking and Total on column F, G, H respectively

Biggest problem I faced is different carparks have different number of entries and exits, hence the loop condition must be dynamic during the data extraction.

Please download the sample file from here: Excel VBA Questions

 

[Alex Blakenburg]

Change the line below to use the ActiveWorkbook (assuming the workbook you want it to run on is the ActiveWorkbook.)

Set wbSumm = ThisWorkbook
Set wbSumm = ActiveWorkbook