영어 (영국)로 지역 언어 형식을 설정하면이 필터에 문제가 있습니다. 영어 (미국)를 사용하면 잘 작동합니다. 제 문제는 필터가 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
어떤 문제가 있습니까? – mischab1
죄송합니다 더 나은 설명을 추가 불분명했습니다 – Damian