title: combo box to change filters on excel pivot table
body: <p>Excel 2013. I am using 3 combo boxes to change filters on the pivot table. 
  My first combo box has "Project1", "Project2" &amp; All. 
  My second combo box has "Customer1", "Customer2" &amp; All. 
  My third combo box has "Country1", "Country2" &amp; All.</p>
  
  <p>I am using 9 pivot tables, all of them have filters as [Project], [Customer], [Country]. </p>
  
  <p>My intention is to change first combo box to Project1 &amp; all the pivot tables filter should change as Project1.I am successfully able to do that. </p>
  
  <p>However when I select the first combo box as "All". First Combo box cell link to Y1. I get VBA Run time error 1004: Application-defined or object-defined error.</p>
  
  <pre><code>Sub ProjectName()
  
  ActiveSheet.PivotTables("PVT1").PivotFields("Project Name").ClearAllFilters
  ActiveSheet.PivotTables("PVT2").PivotFields("Project Name").ClearAllFilters
  ActiveSheet.PivotTables("PVT3").PivotFields("Project Name").ClearAllFilters
  
      ActiveSheet.PivotTables("PVT1").PivotFields("Project Name").CurrentPage = Range("Y1").Text
      ActiveSheet.PivotTables("PVT2").PivotFields("Project Name").CurrentPage = Range("Y1").Text
      ActiveSheet.PivotTables("PVT3").PivotFields("Project Name").CurrentPage = Range("Y1").Text 
  </code></pre>