报表filter中的数据透视表将“2”添加到值中

我有一个数据透视表的文件,根据上个月的date,每月更新filter值。 VBA代码为:

Dim SelectDate As String SelectDate = Worksheets("Raw").Range("A3").Value Worksheets("Main").PivotTables("PivotTable4").PivotFields("Date").CurrentPage = SelectDate 

单元格A3中的值是基于以下函数的string:

= A1&“”&A2
例如:2017年1月

更新数据透视表可以正常工作好几个月,但本月我的数值不再正确更新,经过一番调查,我意识到我的数据透视表已经在January 2017January 2017 January 20172的filter中创build了两个条目,而November 2016失踪:

在这里输入图像说明

但是,当我检查基础数据时,每个月只有一个值:

 June 2016 February 2016 March 2016 January 2016 November 2016 December 2016 August 2016 May 2016 October 2016 July 2016 September 2016 April 2016 January 2017 February 2017 

请注意,当我使用相同的数据创build新的数据透视表时,筛选器仅显示January 2017

有什么build议为什么现有数据透视表的filter将反映January 2017January 2017 January 20172 January 2017

谢谢你的帮助!