Hi,
I have been using the below code for getting the last date in Pivot.
ActiveSheet.PivotTables("PivotTable8").PivotFields("Date").ClearAllFilters
ActiveSheet.PivotTables("PivotTable8").PivotFields("Date").CurrentPage = _
Split(Now() - 1, " ")(0)
I need a code for last working day, i.e. If it is Friday, it should change as Split(Now() - 3, " ")(0).
Please assist.
I have been using the below code for getting the last date in Pivot.
ActiveSheet.PivotTables("PivotTable8").PivotFields("Date").ClearAllFilters
ActiveSheet.PivotTables("PivotTable8").PivotFields("Date").CurrentPage = _
Split(Now() - 1, " ")(0)
I need a code for last working day, i.e. If it is Friday, it should change as Split(Now() - 3, " ")(0).
Please assist.