使用vba取消选择数据透视表中的所有项目

Question

有些人可以解释一下如何取消选择新创建的数据透视表中的所有项目,以便我可以返回并只选择一个或两个项目吗？我尝试了以下方法:

.PivotItems("(Select All)").Visible = False

谢谢.

Answer 1

这可能是你能得到你想要的最接近的东西:

Dim i As Long
.PivotItems(1).Visible = True
For i = 2 To .PivotItems.Count
    .PivotItems(i).Visible = False
Next

这将使第一个选项成为唯一选择的选项(假设它位于指向枢轴场的a中).如果你事先知道你想要什么...相应地修改.