Método PivotField.CalculatedItems (Excel)
Retorna uma coleção CalculatedItems que representa todos os itens calculados no relatório de Tabela Dinâmica especificado. Somente leitura.
Sintaxe
expressão. CalculatedItems
Expressão Uma variável que representa um objeto PivotField .
Valor de retorno
CalculatedItems
Comentários
Para fontes de dados OLAP, esse método retorna uma coleção de comprimento zero.
Exemplo
Este exemplo cria uma lista de itens calculados e suas fórmulas.
Set pt = Worksheets(1).PivotTables(1)
For Each ci In pt.PivotFields("Sales").CalculatedItems
r = r + 1
With Worksheets(2)
.Cells(r, 1).Value = ci.Name
.Cells(r, 2).Value = ci.Formula
End With
Next
Suporte e comentários
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.