Can you lock one filter in a pivot table?

[p45cal]

In the attached is a tweak of Paul's macro which will retain some functionality of the pivot table by including a subset of the Sales data pertaining to only the one department in each of the produced files.
It automates this:

One thing you can do to retain some functionality of the pivot table is to have a copy of the data for just the relevant department within the workbook you send; this is easy if you put a grand total somewhere in the pivot table and double-click on that grand total while the pivot is filtered for the relevant department, a new sheet will be added for whatever rows of source data are needed to produce that grand total. Now change the source of the pivot table to that new sheet's data (and hide it if you want).

There are some comments in the code.