2009-06-01 3 views
0

날짜 필드를 차트 보고서 필터 (필드 방향을 xlPageField로 설정)로 사용하여 매크로가있는 Excel 2002에서 피벗 차트를 생성합니다. 이 피벗 필드의 기본 선택 값을 날짜 필드의 가장 최근 값으로 설정하고 싶습니다. VBA에서이를 수행하기위한 올바른 구문은 무엇입니까?피벗 차트 보고서 필터/페이지 필드의 기본값

답변

0

해당 페이지 필드의 모든 항목을 반복 할 수 없습니까? 피벗 테이블에 대해서는 여기를 참조하십시오. 그러나 차트에서 작동하도록해서는 안됩니다.

+0

내 대안은 SQL 쿼리와 함께 가장 최근의 날짜를 얻는 것이었다. – TheObserver

0

동적으로 차트를 만든 후에 셀을 선택하고 싶지 않으십니까?

뭔가 같은 :

Dim value As Date 
value = "1-apr-09" 
Dim row As Integer 
row = 0 

Dim keeplooping As Boolean 
keeplooping = True 
While (keeplooping) 
    row = row + 1 
    If Range("B" & row).value = value Then 
     keeplooping = False 
     Range("B" & row).Select 
     MsgBox ("found it") 
    ElseIf Range("B" & row).value = "" Then 
     keeplooping = False 
     MsgBox ("Not found") 
    End If 
Wend 
0

chartObject이 .PivotLayout.PivotTable.PivotFields ("fieldName에") .CurrentPage = "fieldValue의이"엑셀 2003의

는하지만 2002 년 추정 비슷합니다

+0

네, 맞습니다.하지만 VBA에서 실제로 계산하기를 원하는 것은 "fieldValue"입니다. 나는 최대 날짜 값을 찾을 별도의 SQL 쿼리를 작성하여 내 문제를 해결했지만 어떻게 피벗 테이블을 쿼리하여 할 수 있었는지 궁금 했어 – TheObserver