本文介绍了数据透视表-取消选择小于一个值的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
在我的数据透视表上(选中的所有项目).我需要取消选择所有低于11
On my pivot table (all items selected). I need to deselect everything lower than 11
(10,9,8,7,6,5,4,3,2,1,0,(blank),(none))
我当前正在使用(如下)
Im currently using (below)
With ActiveSheet.PivotTables("PivotTable5").PivotFields("Count")
.PivotItems("10").Visible = False
.PivotItems("9").Visible = False
.PivotItems("8").Visible = False
.PivotItems("7").Visible = False
.PivotItems("6").Visible = False
.PivotItems("5").Visible = False
.PivotItems("4").Visible = False
.PivotItems("3").Visible = False
.PivotItems("2").Visible = False
.PivotItems("1").Visible = False
.PivotItems("0").Visible = False
.PivotItems("none").Visible = False
.PivotItems("(blank)").Visible = False
End With
...-可以,但是如果定义的值之一不可用,则不起作用.
... - it works, But if one of the values defined are not available, this doesnt work.
是否有更简便的方法来取消选择小于特定值的项目?
Is there an easier way to deselect items less than a particular value?
示例: = if "8"
在列表中-then
取消选择它,else
忽略.也许
example: = if "8"
is on the list - then
deselect it, else
ignore.or perhaps
= .PivotItem("<11").Visible = False
推荐答案
尝试一下
On Error Resume Next
For i = 10 To 0 Step -1
.PivotItems(i).Visible = False
Next i
On Error GoTo 0
这篇关于数据透视表-取消选择小于一个值的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!