无法在透视过滤器区

Question

您好我正在尝试根据单元格中给出的开始日期和结束日期在数据透视表中将多个日期添加到“过滤器”区域。

以下是我使用的代码

ActiveSheet.PivotTables("PivotTable1").PivotFields("Date").PivotFilters. _
Add Type:=xlDateBetween, Value1:=CLng(Range("Datefrom").Value), Value2:=CLng(Range("Dateto").Value)

注意：上面的代码在“行”区域中有“日期”但我希望它在“过滤器”区域中工作时工作正常。

我还记录了一个宏，发现我已经为我的日期设置了可见属性，我也没有任何相关的线索。 感谢您的及时帮助！

Answer 1

过滤器区域不支持过滤类型之间的日期。解决方法是使用TimeLine切片器，如果您有支持它们的Excel版本。 （我认为你需要Excel 2013或更高版本）

如果要使用VBA设置要显示的上限和下限，只需打开宏录制器，更改TimeLine，然后再检查宏录制器生成的代码。

如果您有早期版本的Excel或需要稍微不同的内容，请通过修改您的答案告诉我。