ExcelBanter - PivotTable

ExcelBanter (https://www.excelbanter.com/)

- Excel Programming (https://www.excelbanter.com/excel-programming/)

- - PivotTable (https://www.excelbanter.com/excel-programming/422956-pivottable.html)

John Pierce

PivotTable

In the VBA code to generate a PivotTable, I have lines that say

..PivotItems("1/18/2009").Visible = False
..PivotItems("1/22/2009").Visible = False

Can I replace them with something that says don't show anything less
than a certain age
like don't show if item (date) is greater than Today() - 7.?

All times are GMT +1. The time now is 04:01 AM.