我希望我的宏按特定关键字过滤我的数据透视表 - 一个3个字母的字符串(“xxx”)。不幸的是,字符串“xxx”可以位于文本中的任何位置,并且不会出现在特定数量的其他字母之后或之前。
我尝试了以下两种解决方案来以这种方式过滤枢轴,这两种解决方案都不起作用。
对此的任何帮助都将非常感激。
解决方案1
With ActiveSheet.PivotTables("PivotTable1").PivotFields("column").ClearAllFilters
ActiveSheet.PivotTables("PivotTable1").PivotFields("column"). _
EnableMultiplePageItems = False
End With
With ActiveSheet.PivotTables("PivotTable1").PivotFields("column")
.PivotItems("*xxx*").Visible = True
End With
解决方案2
With ActiveSheet.PivotTables("PivotTable1").PivotFields("column").strPattern("*xxx*")
End With
答案 0 :(得分:0)
ActiveSheet.PivotTables("PivotTable1").PivotFields("TEST").PivotFilters.Add _
Type:=xlCaptionContains, Value1:="123"