Objeto PivotItems (Excel)
Uma coleção de todos os objetos PivotItem em um campo de Tabela Dinâmica.
Os itens são as entradas de dados individuais em uma categoria de campo.
Use o método PivotItems do objeto PivotField para retornar a coleção PivotItems .
O exemplo a seguir cria uma lista enumerada de nomes de campos e os itens contidos nesses campos para o primeiro relatório de tabela dinâmica em Sheet4.
Worksheets("sheet4").Activate
With Worksheets("sheet3").PivotTables(1)
c = 1
For i = 1 To .PivotFields.Count
r = 1
Cells(r, c) = .PivotFields(i).Name
r = r + 1
For x = 1 To .PivotFields(i).PivotItems.Count
Cells(r, c) = .PivotFields(i).PivotItems(x).Name
r = r + 1
Next
c = c + 1
Next
End With
Use PivotItems (index), em que o índice é o número ou o nome do índice do item, para retornar um único objeto PivotItem . O exemplo a seguir oculta todas as entradas no primeiro relatório de tabela dinâmica em Sheet3 que contêm “1998” no campo Year.
Worksheets("sheet3").PivotTables(1) _
.PivotFields("year").PivotItems("1998").Visible = False
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.