Macro help or VBA

[guaya81]

Good day

I'm looking for help in programming a macro or a VBA to get filter the slicers for only the today date

please a photo if the file with slicer and where the button will be located



https://www.dropbox.com/sh/ax6g0k3w7kitkjd/AADrRks7V-jEykeGlqU89x6ta?dl=0

 

[JPARKHURST]

I have NOT tried this, but just did a search myself looking at a similar problem. Take alook at the code below and see if you can make it work for you.

Sub ReportFiltering_Single()
'PURPOSE: Filter on a single item with the Report Filter field
'SOURCE: www.TheSpreadsheetGuru.com


Dim pf As PivotField


Set pf = ActiveSheet.PivotTables("PivotTable2").PivotFields("Fiscal_Year")


'Clear Out Any Previous Filtering
  pf.ClearAllFilters


'Filter on 2014 items
  pf.CurrentPage = "2014"


End Sub
[\code]


Take a look here for more info.

https://www.thespreadsheetguru.com/blog/2014/9/27/vba-guide-excel-pivot-tables

HTH,

Jon

 

[guaya81]

Thank for the article will see if I can figure out how to make it work

thanks