2017-09-15 6 views
0

VBA를 사용하여 특정 피벗 테이블 필터링을 자동화하려고합니다. VBA를 사용하여 "보고서 필터"(첨부 된 스크린 샷 참조)를 추가하는 방법을 모르겠습니다.VBA를 사용하는 피벗 테이블 보고서 필터

프로세스를 자동화하려면 행, 열 및 값을 추가하는 코드가 있지만 보고서 필터 코드를 찾을 수없는 것 같습니다.

코드를 사용하여 도와 주실 수 있습니까?

Filter

Report Filter

+1

어떤 코드를 시도했으며 그 문제점은 무엇입니까? – braX

+2

가장 좋은 방법은 아무것도 수행하는 방법을 확인하려면 - 매크로를 기록하면 볼 수 있습니다 – avb

+0

@braX 보고서 필터를 추가하려면 피벗 테이블 코드가 필요합니다. 예 : 피벗 테이블을 수동으로 추가하고 필터, 열, 행 및 합계 값과 같은 4 가지 기본 속성을 적용/삽입 할 수 있습니다 (첨부 된 이미지 참조). 프로세스를 자동화하기 위해 행, 열 및 합계 값을 추가하는 코드가 있지만 보고서 필터 코드를 찾지 못하는 것 같습니다. 그걸로 제발 도와 줄 수 있어요? –

답변

0

덕분에 제안에 대한 @avb. 매크로 기록이 도움이되었습니다. 피벗 보고서 필터를 추가하는 코드는 다음과 같습니다.

Sub pivotReportFilter(ptUse As PivotTable, fName As String) 

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

    End Sub