Método PivotTable.PivotValueCell (Excel)
Recuperar o objeto PivotValueCell para uma determinada Tabela Dinâmica forneceu determinados índices de linha e coluna.
Sintaxe
expressão. 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 | Opcional | Variantes | Se for do tipo PivotLine, especifica a Linha Dinâmica na área de linha com a qual o PivotValueCell está alinhado. Se for do tipo Int, especifica a posição da Linha Dinâmica na área de linha com a qual o PivotValueCell está alinhado. Se ausente, Empty, Null ou 0 especifica a grande linha total. |
ColumnLine | Opcional | Variantes | Se for do tipo PivotLine, especifica a Linha Dinâmica na área de coluna com a qual o PivotValueCell está alinhado. Se do tipo Int, especifica a posição da PivotLine na área de coluna com a qual o PivotValueCell está alinhado. Se ausente, Empty, Null ou 0 especifica a grande coluna total. |
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.