Speeding up creating worksheets based upon items in pivot table

Hi members,

This is a repost, but this time with the attachment added (hopyfully)

I have a workbook for which i want to create new worksheets for every item in the filter selection.
Since i want to modify the created worksheets and only keep the values and not the pivot itself, i created a code which seems to work, but is quite slowly.

Is there a way how i can speed up this code?

Please Login or Register  to view this content.

I cannot seem to upload the file ....
The problem is that the following code

"For Each PI In Worksheets(MyWs).PivotTables(MyPIV).PivotFields(MyField).PivotItems
PI.Visible = True

For Each PI2 In Worksheets(MyWs).PivotTables(MyPIV).PivotFields(MyField).PivotItems
If Not PI2.Name = PI.Name Then PI2.Visible = False
Next PI2'"

is comparing each item to each other (>500 options).

What i actually want is that the code will unselect all items, except for each PI in worksheet but do not seem to get the code working.
Goal is to unselect all items in pivot table and then only choose the unique PI and create a new worksheet for it. I want to continue doing this, untill all worksheets has been created

Hi hdinkie

If I understand try this Code...

Please Login or Register  to view this content.

Hi hdinkie

This, I'd assume, is good...

This code is creating the worksheets as i was hoping for

This I have no clue...

For each PI in pivottable, it should select the filter of only that specific PI.

Perhaps it's related to this...

all description in column C has a "A"

and this...

The description in column C could differ for each PI.

Please clarify by attaching a sample workbook the Structure of which is the same as your actual workbook.

Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

INCLUDE ANY CODE YOU'RE USING OR HAVE TRIED.

Remember to desensitize the data.

To do this, click on Go Advanced (below the Edit Window) while you are composing a reply, then scroll down to and click on Manage Attachments and the Upload window will open. Click on Browse and navigate to (and double-click) the file icon that you want to attach, then click on Upload and Close this Window to return to the Edit window. When you have finished composing your post, click on Submit Post.

Hi Jaslake,

Sorry for the confusing, see hereby the attachments of a before and after file.

Hope this clarifies and you know a way that would remove the loop. Thanks a lot!

ps: i know limited the possible items to 25 just items, but the more items the slower the code will run. In my original file i have about 500 items ....

Hi hdinkie

See if this Code in the attached does as you require...

Please Login or Register  to view this content.

You're welcome...glad I could help. Thanks for the Rep.