2012-05-04 1 views
0

영어 (영국)로 지역 언어 형식을 설정하면이 필터에 문제가 있습니다. 영어 (미국)를 사용하면 잘 작동합니다. 제 문제는 필터가 5 월 30 일의 선택을 보이지 않게 만들고, 호출에 실패하고 오류 섹션으로 이동한다는 것입니다.필터 Excel에서 피벗

http://wikisend.com/download/138750/Pivottable.xls

이 알려진 버그입니까? http://support.microsoft.com/default.aspx?scid=kb;en-us;114822&Product=xlw

이 게시 시뮬 날짜를 필터링 Filter pivottable in Excel 2003

Sub Filter() 
    Dim PvtItem As PivotItem 
    Dim ws As Worksheet 

    On Error GoTo Whoa1 

    Set ws = Sheets("pivot") 

    '~~> Show All 
    For Each PvtItem In ws.PivotTables("PivotTable1").PivotFields("Date").PivotItems 
     PvtItem.Visible = True 
    Next 

    On Error GoTo Whoa2 '<~~ If no match found in Pivot 

    '~~> Show Only the relevant 
    For Each PvtItem In ws.PivotTables("PivotTable1").PivotFields("Date").PivotItems 
     If Format(PvtItem.Value, "DD/MM/YYYY") <> Format(Range("today"), "DD/MM/YYYY") Then 
      PvtItem.Visible = False 
     End If 
    Next 

    Exit Sub 
Whoa1: 
    MsgBox Err.Description 
    Exit Sub 
Whoa2: 
    '~~> Show All 
    For Each PvtItem In ws.PivotTables("PivotTable1").PivotFields("Date").PivotItems 
     PvtItem.Visible = True 
    Next 
End Sub 
+0

어떤 문제가 있습니까? – mischab1

+0

죄송합니다 더 나은 설명을 추가 불분명했습니다 – Damian

답변

1

오른쪽 스냅 샷과 같이 날짜 필드를 클릭 클릭 (UK 설정) Excel 2003에서 시도하고 테스트 완료 Field Settings을 클릭 한 다음 Number을 클릭하십시오. 다음과 같이 날짜 형식을 설정하십시오. 이제 동일한 코드를 사용해보십시오.

enter image description here

+0

죄송합니다 작동하지 않습니다 !! Excel 2007 및 Windows 7 사용. – Damian

+0

음 ... 나는 Excel 2003을 사용하고 있었다는 인상하에있었습니다 ... –