PivotFilters.Add无法正常工作

时间:2013-12-02 17:27:34

标签: excel-vba vba excel

我正在尝试将Pivot表应用于没有循环的过滤器,并为每个元素设置visibile = true。

我已经提出了这行代码:

Worksheets("DATI").PivotTables(1).PivotFields("ACCOUNT").PivotFilters.Add FilterType:=xlCaptionEquals, DataFilter:="ACCOUNT", Value1:=Filtro

Filtro就是这个变量

Filtro = Worksheets("Riconciliazione").Range("b2").Value

但是我得到了448错误 - 未找到命名参数。

我做错了什么?

1 个答案:

答案 0 :(得分:0)

它抱怨函数的参数名称。

这是该功能的描述。我没有看到FilterType& DataFilter

Function Add(Type As XlPivotFilterType, [DataField], [Value1], [Value2], [Order], [Name], [Description], [MemberPropertyField]) As PivotFilter