使用VBA的數據透視表報表過濾器

我正在嘗試使用VBA自動化特定的數據透視表過濾。我不確定如何使用VBA添加「報告過濾器」（請參閱附加屏幕截圖）。使用VBA的數據透視表報表過濾器

要自動執行此過程，我得到了添加行，列和值的代碼，但似乎無法找到報告過濾器的代碼。

你能幫我解決這個問題嗎？

Filter

Report Filter

來源

2017-09-15 Prashant Jain

你試過了什麼樣的代碼？它有什麼問題？ – braX

檢查如何做任何事情的最佳方法 - 記錄一個宏，你會看到 – avb

@braX我需要一個數據透視表的代碼來添加報表過濾器。例如。我們可以手動添加數據透視表並應用/插入4個基本屬性，即過濾器，列，行和求和值（請參閱附圖）。爲了使過程自動化，我得到了添加行，列和求和值的代碼，但似乎無法找到報告過濾器的代碼。可以請幫忙嗎？ –

感謝@avb的意見。錄製宏有所幫助。添加數據透視表過濾器的代碼是這樣的。

Sub pivotReportFilter(ptUse As PivotTable, fName As String) 

    With ptUse.PivotFields(fName) 
     .Orientation = xlPageField 
     .Position = 1 
    End With 

    End Sub

來源

2017-09-25 14:46:20

使用VBA的數據透視表報表過濾器

回答

相關問題