Adding a pivot table to a new sheet

Hi all,

I have a macro in the attached workbook which adds a new sheet with extracts from the Report sheet. Could you add a code please to the existing one so that it adds a pivot table in cell L2 similar to what I have on sheet 1. The number or rows will change every time a user updates the Report sheet, so the new sheet would need to show pivot for all rows in that sheet which will be different from sheet 1.

Thank you!