안녕하세요, 피벗 테이블을 VBA 명령을 새로 고칠 필요가 설정되어 있습니다. 그러나 피벗 명령을 새로 고칠 때 필수 열 레이블 값 중 일부가 제외됩니다. 원래는 설정되었지만 확실하지 않은 피벗 캐시를 변경해야한다고 생각합니다. 내 소스 파일이 원격에 위치,피벗 캐시 새로 고침 VBA
Worksheets("Summary by Account").PivotTables("PivotTable1").RefreshTable
Dim pt As PivotTable
Dim pf As PivotField
Dim pi As PivotItem
For Each pt In ActiveSheet.PivotTables
pt.ManualUpdate = True
pt.PivotCache.MissingItemsLimit = xlMissingItemsNone
For Each pf In pt.PivotFields
If pf.Orientation <> 0 Then
If pf.Orientation = xlPageField Then
pf.CurrentPage = "(All)"
Else
For Each pi In pf.PivotItems
pi.Visible = True
Next pi
End If
End If
Next pf
pt.ManualUpdate = False
Next pt
Set pi = Nothing
Set pf = Nothing
Set pt = Nothing
Set wks = Nothing
With ActiveSheet.PivotTables("PivotTable1").PivotFields("Nominal/Category")
.PivotItems("(blank)").Visible = False
End With