2016-11-01 154 views
1

我知道類似的問題已多次提出,但我找到並根據需要調整的解決方案似乎不起作用,因此我非常感謝任何幫助。將數據透視表過濾器鏈接到單元格

我的問題是我有一個PivotTable2,我想鏈接到一個單元格值(C1)的過濾器。 單元格值本身是從與其他數據源的另一個數據透視表連接的分割器中提取的。 我希望在單元格C1中的值發生更改時自動更改數據透視表2的篩選器。

下面是我錄製的宏,所以這將是可能更容易入手:

Sub Change_Pivot_Table_Filter() 

    Range("C59").Select 
    ActiveSheet.PivotTables("PivotTable2").PivotFields("delivery_date"). _ 
    CurrentPage = "(All)" 
    With ActiveSheet.PivotTables("PivotTable2").PivotFields("delivery_date") 
    .PivotItems("10/21/2016").Visible = False 
    .PivotItems("10/23/2016").Visible = True 
    End With 
    End Sub 

非常感謝!

回答

1

您可以使用工作表更改事件並獲得您想要的結果。 像這樣的東西

Private Sub Worksheet_Change(ByVal Target As Range) 
If Target.Row = 1 And Target.Column = 3 Then 
If Target.Value <> "" Then 
ActiveSheet.PivotTables("PivotTable2").PivotFields("delivery_date").CurrentPage = Target.Value 
End If 
End If 
End Sub 
相關問題