How to Clear All Items in a Column Label and Filter for Two or more Items in the Column Label RRS feed

  • Question

  • Hello can any body help me with these line of codes.

    With ActiveSheet.PivotTables("PivotTable3").PivotFields("ColumnLabel")

    .PivotFilters.Add Type:=xlCaptionEquals, Value1:="Item1"
    .PivotItems("Item2").Visible = True

    End With

    I hava a pivottable with lot of items on both the column labels and the row labels (more than 500), I want to clear the items first with .ClearAllFilters, add Pivot Item with caption equals Item1 and then add Item2. I am having the difficulty adding the second item to the column label.

    Please can anyone render me help.

    Thanks in advance.

    Saturday, November 7, 2015 5:46 PM


All replies