excel - 按过去 14 天数据透视表 Excel 2010 过滤

Question

我在包含日期列的工作表上有一个表。我在新工作表上创建了一个数据透视表/图表。我希望能够过滤过去 14 天显示的图表中的数据(始终相对于当前日期)。

我和这个用户有同样的问题:filtering an Excel pivot table to show the last 24 hours data

除了我不能在源数据中添加一列，我需要在 14 天内而不是 24 小时内。必须有内置的方法来做到这一点，或者我可以在 VBA 中做到这一点吗？

谢谢

Answer 1

当然，您可以按日期过滤，但如果没有 VBA，我认为它必须是手动的。这是一个 VBA 例程，将其设置为过去 14 天，包括今天:

Sub FilterPivotByDate()
Dim pvt As Excel.PivotTable
Dim DaysToShow As Long
Dim DateString As String

Set pvt = ActiveSheet.PivotTables(1)
DaysToShow = 114
DateString = Format(Date - (DaysToShow - 1), "m/d/yyyy")
With pvt.PivotFields("date")
    .ClearAllFilters
    .PivotFilters.Add Type:=xlAfterOrEqualTo, Value1:=DateString
End With
End Sub