PivotTable...Questions!!!..
Swapping DataSource
피봇테이블을 이야기 하는 도중 아래와 같은 질문이 있었다
날자휠드를 행방향으로 배치할때는 년,분기,월이 논리적으로 잘 그룹핑이
되지만 페이지 방향으로 하면 년,분기,월이 각각 연관없이 독립적으로
리스트가 나타난다
방법이 없을까??
위의 것은 본래 피봇테이블이 그렇게 생겨먹은 것이니 어쩔수 없고
안되면 만들면 될 것이다
아래의 그림과 같이 콤보상자를 년,분기,월로 만들고 선택하고 버튼을 크릭하면
해당 기간만 피봇테이블의 원본으로 불러 들이도록 해보는것을 해법으로
해보자
질문하신분의 의도와 안맞더라도 아마도 참고하여 상황에 맞게
수정할수 있을 것이다
3개의 콤보상자에서 설정된 기간정보를 변수로
데이타원본에서 해당기간만 뽑아서
PivotTable의 원본을 바꿔치기 해주도록 하였다
<![CDATA[
Set rData = GetFilteredDataSource
If Not IsValidSource(rData) Then
MsgBox "해당 정보가 없습니다!!"
GoTo X
End If
oPivot.SourceData = rData.Parent.Name & "!" & rData.Address(, , xlR1C1)
oPivot.RefreshTable
]]>
그런후 다른 휠드를 지난시간에서 하였던 대로 선택하면 해당기간내의
정보만 볼수 있도록 하였다
실은 행방향으로 날자정보를 배치하고 엑셀이 제공하는 기능을 최대한
활용하는 것이 좋을 것이나..
필요한 기간정보만 불러다가 분석해 본다는 측면에서도 괞찮고..
이러면 어떨까??라는 문제의식측면에서 한번 해보는 것도 괞찮고
프로그래밍테크닉을 확장하는데 좋을것이니
각자 확장응용하여 보시기 바란다
PivotTable_Q_1.
