Objeto PivotValueCell (Excel)
Fornece uma maneira de expor valores de células no caso de células reais (objetos Range ) não estarem disponíveis.
Exemplo
Este exemplo de código usa a propriedade PivotValueCell para testar se o valor de uma célula em uma Tabela Dinâmica é maior que outra célula.
Sub TestEquality()
Dim X As Double
Dim Y As Double
'This code assumes that you have a Standalone PivotChart on one of the worksheets.
X = ThisWorkbook.PivotTables(1).PivotValueCell(1, 1).Value
Y = ThisWorkbook.PivotTables(1).PivotValueCell(1, 2).Value
If X > Y Then
MsgBox "X is greater than Y"
Else
MsgBox "Y is greater than X"
End If
End Sub
Métodos
Propriedades
Confira também
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.