Compressing legend of pivot chart to only show relevant names

Hello,

I've made a macro that, amongst other things, makes several pivot charts where one can see e.g. the hours a teammember has written on the projects he is working on. However, the legend displays ALL projects in the file, not only the projects displayed in the chart. How can I automatically remove all the project names from the legend that are not displayed in the graph (teammembers are never working on ALL running projects)? Doing it every time by hand kind of defeats the point of a macro... I have been searching quite a bit for this, but strangely enough can't find any tips anywhere on this.

Cheers and thanks for any hints!

Jasper