使用VBA在excel数据透视表筛选器中设置值

使用VBA在excel数据透视表筛选器中设置值,excel,pivot-table,powerpivot,vba,Excel,Pivot Table,Powerpivot,Vba,我有一个数据透视表,它的源代码是excel 2010文档中的powerpivot模型。 我在pivot表的filter部分有两列。我需要通过VBA设置它们的值 我做这件事有很多困难。谢谢你的帮助 您的意思是想知道如何通过VBA设置过滤器的条件吗?是的,没错。目前正在尝试多种不同的方法,但如果我能让它工作的话,下面几行是我尝试做什么的大致思路:Set pt=ActiveSheet.PivotTablesTests pt.ClearAllFilters pt.PivotFields[CaseRece

我有一个数据透视表,它的源代码是excel 2010文档中的powerpivot模型。 我在pivot表的filter部分有两列。我需要通过VBA设置它们的值


我做这件事有很多困难。谢谢你的帮助

您的意思是想知道如何通过VBA设置过滤器的条件吗?是的,没错。目前正在尝试多种不同的方法,但如果我能让它工作的话,下面几行是我尝试做什么的大致思路:Set pt=ActiveSheet.PivotTablesTests pt.ClearAllFilters pt.PivotFields[CaseReceivedDate].[Year]。[Year].PivotFilters.Add Type:=xlCaptionEquals,Value1:=2014我把范围缩小到了我认为更接近但仍然不起作用的程度。设置pt=ActiveSheet.PivotTableTests pt.ClearAllFilters pfy.PivotFilters.Add类型:=xlCaptionEquals,值1:=[CaseReceivedDate].[Year].&[2014]