运行时错误'1004':无法设置PivotItem类的Visible属性Dim pt As PivotTableDim pi As PivotItemIf错误发生在以下位置:Do Until i >= pf.PivotItems.count - 1
pi.Visible= False 'Error here
pf
我正在尝试通过VBA操作Excel 2007透视表,这样我就可以遍历透视表的类别,将所有内容设置为不可见,只保留一个,将工作表保存为pdf并继续到下一个类别。为此,我使用以下代码段。= False Then End If
For Each但是,下一次它进入循环时,它会在指定的行给出“无法设置PivotItem类的Visible属性”错误。我知道在数据透视