Excel VBA：从每个切片器中select所有项目
我正在尝试从工作簿中存在的每个切片器中select所有项目。
目前我有以下，但是这是产生一个“运行时错误438：对象不支持此属性或方法”在第6行，我开始循环通过我：
Dim sc As SlicerCache Dim sl As Slicer Dim i As Integer For Each sc In ActiveWorkbook.SlicerCaches For Each sl In sc.Slicers For i = 1 To sl.SlicerItems.Count sl.SlicerItems(i).Selected = True Next i Next sl Next sc 我需要在中间的i循环，因为后来我想使用相同的代码来select只存在于一个数组中的项目。
任何帮助非常感谢，谢谢！
将该行更改为For i = 1 to sc.SlicerItems.Count ，它应该工作（slicerItems是SlicerCache的属性，而不是Slicer对象本身