In diesem Beispiel wird das Element "1998" im ersten PivotTable-Bericht von Sheet3 ausgeblendet.
Worksheets("sheet3").PivotTables(1) _ .PivotFields("year").PivotItems.Item("1998").Visible = False