VBA Create new workbook and copy paste data

I'm new to the forums and just started learning VBA. I was wondering if anyone could provide some assistance in creating a VBA macro to do the following:

I have a set of data in one workbook which I'll call Workbook1 for instance.

For example, if there is information on a PivotTable like this:

I would like to create a macro (an inputbox maybe) to search for a region (A for example) and create a new workbook & save with the region's name (A.xls for example). The more complicated part would be to then copy the information to the new workbook from columns "office - total" and all the rows from office AA to total. I tried to figure this out searching through the forums but couldn't quite put everything together. Any help would be much appreciated!

Thanks

Edit: What i'm trying to aim at is to be able to input a region in the source workbook and automatically create a new workbook with the inputted region. The new workbook should then be automatically populated with information under the region from the source workbook.

I've attached a test spreadsheet which I'm using to try and replicate the effect but with less complex data.