在Excel工作簿中,我在工作表上有“静态”数据透视表,它基于另一个工作表的数据。
我正在刷新数据表上的数据(谢谢你队长Obvious!),然后我想显示所有项目,删除空白项目,所以我正在运行抛出所有PivotItems将它们设置为可见,并且,最后,取消选择空白的那个:
i = 1
ThisWorkbook.Sheets("TCD").PivotTables(i).PivotFields("CODETAT").ClearAllFilters
ThisWorkbook.Sheets("TCD").PivotTables(i).PivotCache.MissingItemsLimit = xlMissingItemsNone
For Each PvI In ThisWorkbook.Sheets("TCD").PivotTables(i).PivotFields("CODETAT").PivotItems
PvI.Visible = True
Next
ThisWorkbook.Sheets("TCD").PivotTables(i).PivotFields("CODETAT").PivotItems("(blank)").Visible = False
在我的循环的最后一次发生,在第4个PivotItems上,我有一个错误的执行'1004'(我将它翻译成法语,它可能是我的一些错误,对不起)“不可能定义属性可见PivoItem类,所以我查了几件事:
?ThisWorkbook.Sheets("TCD").PivotTables(i).PivotFields("CODETAT").PivotItems.count
4
对于x = 1到4:
?ThisWorkbook.Sheets("TCD").PivotTables(i).PivotFields("CODETAT").PivotItems(x)
(blank)
SFT
ACQ
TEP
看起来我的数据透视表中有4个项目,但是
那么第四个PivotItems元素来自哪里,我怎样才能获得它? 谢谢。