Classe ValueChange - um valor que foi alterado em um relatório da Tabela Dinâmica que é baseado em uma fonte de dados OLAP (Excel VBA)

A classe ValueChange representa um valor que foi alterado em um relatório da Tabela Dinâmica que é baseado em uma fonte de dados OLAP. Para usar uma variável de classe ValueChange, ela primeiro precisa ser instanciada por exemplo

Dim vlc as ValueChange
Set vlc = ActiveCell.PivotTable.ChangeList(Index:=1)

For Each

Aqui está um exemplo de processamento dos itens ValueChange em uma coleção.

Dim vlcChangeList As ValueChange
For Each vlcChangeList In ActiveCell.PivotTable.ChangeList
	
Next vlcChangeList

AllocationMethod

Retorna o método a ser usado para alocar esse valor ao executar o teste de hipóteses. Somente leitura. Os valores de retorno possíveis são xlEqualAllocation - Use alocação igual, xlWeightedAllocation - Use alocação ponderada.

A propriedade AllocationMethod corresponde à configuração Método de Alocação na caixa de diálogo Configurações de Teste de Hipóteses de um relatório de Tabela Dinâmica com base em uma fonte de dados OLAP porque foi definida no momento em que essa alteração foi aplicada originariamente. Se o objeto valueChange especificado tiver sido criado usando o método Add da coleção PivotTableChangeList , e o parâmetro AllocationMethod correspondente não tiver sido fornecido, o método de alocação padrão do O servidor OLAP é retornado.

Dim xamAllocationMethod As XlAllocationMethod
xamAllocationMethod = ActiveCell.PivotTable.ChangeList(1).AllocationMethod

AllocationValue

Retorna o valor a ser alocado ao executar um teste de hipóteses. Somente leitura. Os valores de retorno possíveis são xlAllocateIncrement - Incremento com base no valor antigo, xlAllocateValue - O valor digitado dividido pelo número de alocações.

A propriedade AllocationValue corresponde à configuração Valor para Alocar na caixa de diálogo Configurações de Teste de Hipóteses de um relatório de Tabela Dinâmica com base em uma fonte de dados OLAP porque foi definida no momento em que essa alteração foi aplicada originariamente. Se o objeto valueChange especificado tiver sido criado usando o método Add da coleção PivotTableChangeList e o parâmetro outlocationvalue correspondente não tiver sido fornecido, o valor de alocação padrão do OLAP __ servidor é retornado.

Dim xavAllocationValue As XlAllocationValue
xavAllocationValue = ActiveCell.PivotTable.ChangeList(1).AllocationValue

AllocationWeightExpression

Retorna a expressão de peso MDX que será usada para esse valor ao executar teste de hipóteses. Somente leitura.

A propriedade AllocationWeightExpression corresponde à configuração Expressão de Peso na caixa de diálogo Configurações de Teste de Hipóteses de um relatório de Tabela Dinâmica com base em uma fonte de dados OLAP porque foi definida no momento em que essa alteração foi aplicada originariamente. Se o objeto valueChange especificado tiver sido criado usando o método Add da coleção PivotTableChangeList e o parâmetro AllocationWeightExpression correspondente não tiver sido fornecido, o peso padrão a expressão do servidor OLAP será retornada.

Dim strAllocationWeightExpression As String
strAllocationWeightExpression = ActiveCell.PivotTable.ChangeList(1).AllocationWeightExpression

Delete

Exclui o objeto valueChange especificado da coleção PivotTableChangeList .

ActiveCell.PivotTable.ChangeList(1).Delete

Order

Retorna um valor que indica a ordem em que essa alteração foi executada em relação a outras alterações na coleção PivotTableChangeList . Somente leitura.

O valor da propriedade Order é atribuído automaticamente pelo Excel com base na ordem em que o usuário aplicou as alterações nas células de valor do relatório de Tabela Dinâmica. Se várias alterações forem aplicadas em uma única operação, o Excel atribuirá arbitrariamente a ordem nesse conjunto de alterações.

Dim lngOrder As Long
lngOrder = ActiveCell.PivotTable.ChangeList(1).Order

PivotCell

Retorna um objeto PivotCell que representa a célula tupla que foi alterada. Somente leitura.

Quando o valor da propriedade VisibleInPivotTable do objeto valueChange especificado for true, a propriedade PivotCell retornará um objeto PivotCell da célula (tupla) que foi alterada. Quando o valor da propriedade VisibleInPivotTable do objeto valueChange especificado for false, a propriedade PivotCell retornará NULL.

Dim pvtlcelPivotCell As PivotCell
Set pvtlcelPivotCell = ActiveCell.PivotTable.ChangeList(1).PivotCell

Tuple

Retorna a tupla MDX do valor que foi alterado na fonte de dados OLAP. Somente leitura.

Dim strTuple As String
strTuple = ActiveCell.PivotTable.ChangeList(1).Tuple

Value

Retorna o valor que o usuário inseriu na célula ou que a fórmula na célula foi avaliada quando a instrução Update Cube foi executada pela última vez em relação à fonte de dados OLAP. Somente leitura.

Dim dblValue As Double
dblValue = ActiveCell.PivotTable.ChangeList(1).Value

VisibleInPivotTable

Retorna se a célula tupla está visível no momento no relatório de Tabela Dinâmica. Somente leitura.

Retorna true se a célula (tupla) estiver visível no relatório de tabela dinâmica. caso contrário, false.

Dim booVisibleInPivotTable As Boolean
booVisibleInPivotTable = ActiveCell.PivotTable.ChangeList(1).VisibleInPivotTable