VBA Code to Hide Blanks in Pivot Table

[bjnockle]

I have a pivot table with "blanks" due to the fact that the source is empty. I am looking for a vba code to hide the "blanks" in the pivot table fields.

Note: I have attached a sample copy of what the pivot table looks like.

Thanks for your assistance in advance.

[Bob Phillips]

Worksheets("PivotTable").PivotTables("PivotTable1").PivotFields("Employee Name").PivotItems("(blank)").Visible = False