Método PivotTable.PivotValueCell (Excel)

Recupere o objeto PivotValueCell para uma determinada Tabela Dinâmica fornecida com determinados índices de linha e coluna.

Sintaxe

mais simples. PivotValueCell (RowLine, ColumnLine)

expressão Uma variável que representa um objeto de Tabela Dinâmica .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Linha de Linha de Linha	Opcional	Variant	Se for do tipo PivotLine, especifica a PivotLine na área da linha com a qual a PivotValueCell está alinhada. Se for do tipo Int, especifica a posição da Linha Dinâmica na área da linha com a qual a PivotValueCell está alinhada. Se estiver ausente, Vazio, Nulo ou 0 especificará a linha de total geral.
ColumnLine	Opcional	Variant	Se for do tipo PivotLine, especifica a PivotLine na área da coluna com a qual a PivotValueCell está alinhada. Se for do tipo Int, especifica a posição da Linha Dinâmica na área da coluna com a qual a PivotValueCell está alinhada. Se estiver ausente, Vazio, Nulo ou 0 especificará a coluna de total geral.

Valor de retorno

PIVOTVALUECELL

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 o valor de outra célula.

Sub TestEquality()
Dim X As Double
Dim Y As Double

'This code assumes 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

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.