[求助] vba筛选字段的问题

compshang

这个透视图连接着一个很庞大的数据库，其中一个字段需要通过vba进行筛选，次字段包含几百个项目，我只需要其中5-6个。通过宏录制，他告诉我“too many line continuations"，然后自动中断了。

我自己分析了一下宏录制的语句：它是通过hiddenitemslist来进行筛选的，那么像我这种大量项目需要隐藏的情况，就需要写下很长的语句了，因此除了问题。请问，有没有通过类似showitemslist之类的方法进行筛选的呢？如果有，那就简单多了。

 

附件说明：1 - 宏出错的提示窗口 2 - 录制的宏（自动中断）

 

BWgTcOz5.zip (13.15 KB, 下载次数: 12)

2008-8-12 11:06 上传

点击文件名下载附件
[求助] vba筛选字段的问题

fankairong

没看懂你的附件，凭感觉给你个例子参考下

    For I = 1 To ActiveSheet.PivotTables("数据透视表").PivotFields("字段").PivotItems.Count
    If ActiveSheet.PivotTables("数据透视表").PivotFields("字段").PivotItems(I) <> "条件" Then
    ActiveSheet.PivotTables("数据透视表").PivotFields("字段").PivotItems(I).Visible = False
    End If
    Next