vba를 사용하여 피벗 테이블에 필터를 추가하는 방법

VBA 코드를 사용하여 피벗 테이블을 만든 다음 행, 열 및 값을 추가했습니다. 이제 필터를 추가해야합니다. 필터를 어떻게 추가 할 수 있습니까?vba를 사용하여 피벗 테이블에 필터를 추가하는 방법

필자는 필터가있는 피벗 테이블을 반복해야하는 VBA 코드가 있습니다. 지금까지 :

 'Add item to the Report Filter- chose the filter that you want 
    pvt.PivotFields("DB").Orientation = xlPageField 
    'Position Item in list 
    pvt.PivotFields("DB").Position = 1

어떤 도움을 많이 감사합니다!

출처

2017-09-12 ofir

수동으로 필터를 추가하는 동안 매크로를 기록해 보았습니다. 어떤 코드가 생성되는지 보려면 어떻게해야합니까? –

두 번째 필터와 루핑이 필요합니다 : pvt.PivotFields ("de_em"). Orientation = xlPageField. 변수 de_em은 값 (0과 1)을 가져야합니다. – ofir

그럼 왜하지 않습니까? –

내가 알고있는 피벗 테이블에 필터를 추가하는 방법은 다음과 같습니다.

Dim pvt As PivotTable 

Set pvt = ActiveSheet.PivotTables("PivotTable1") 

'Adds to the Report Filter 
pvt.PivotFields("DB").Orientation = xlPageField 

'Adds to the Column Labels 
pvt.PivotFields("DB").Orientation = xlColumnField 

'Adds to the Row Labels 
pvt.PivotFields("DB").Orientation = xlRowField

출처

2017-09-12 21:08:50 DaBeau96

내가 그런 식으로 뭔가를 사용해야한다고 생각 : 각 세포에 대한 pvt.PivotFields ("de_em") 다음 셀하지만 난 몰라 어떻게 – ofir

vba를 사용하여 피벗 테이블에 필터를 추가하는 방법

답변

관련 문제