Classe PivotLine (Excel VBA)

Um objeto PivotLine é uma linha de linhas ou colunas em uma tabela dinâmica do Excel.

Set

Para usar uma variável de classe PivotLine, ela primeiro precisa ser instanciada por exemplo

Dim pvtln as PivotLine
Set pvtln = ActiveCell.PivotCell.PivotColumnLine

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo PivotLine: PivotCell.PivotColumnLine, PivotCell.PivotRowLine, PivotField.AutoSortPivotLine, PivotLines.Item e PivotAxis.PivotLines

For Each

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

Dim pvtln As PivotLine
For Each pvtln In ActiveCell.PivotLines
	
Next pvtln

LineType

Retorna uma constante XlPivotLineType que indica o tipo de linha dinâmica. Somente leitura.

Os valores possíveis são xlPivotLineBlank - Linha em branco após cada grupo, xlPivotLineGrandTotal - Linha do total geral, xlPivotLineRegular - Linha dinâmica regular com itens dinâmicos, xlPivotLineSubtotal - Linha do subtotal.
Dim xplLineType As XlPivotLineType
xplLineType = ActiveCell.PivotCell.PivotColumnLine.LineType

Parent

Retorna o objeto pai do objeto PivotLine especificado. Somente leitura.

PivotLineCells

Retorna uma coleção de objetos PivotCell em uma tabela dinâmica. Somente leitura.

Dim plcsPivotLineCells As PivotLineCells
Set plcsPivotLineCells = ActiveCell.PivotCell.PivotColumnLine.PivotLineCells

PivotLineCellsFull

Recupera todas as células de tabela dinâmica , incluindo aquelas ocultas em formato compacto. Somente leitura.

Dim plcsPivotLineCellsFull As PivotLineCells
Set plcsPivotLineCellsFull = ActiveCell.PivotCell.PivotColumnLine.PivotLineCellsFull

Position

Retorna ou define a posição do objeto PivotLine. Somente leitura.

Dim lngPosition As Long
lngPosition = ActiveCell.PivotCell.PivotColumnLine.Position

PivotLines.Count

Retorna o número de itens na coleção PivotLines . Somente leitura.

Dim lngCount As Long
lngCount = ActiveCell.PivotTable.PivotColumnAxis.PivotLines.Count

PivotLines.Item

Retorna um elemento específico do objeto da coleção PivotLines pela respectiva posição na coleção. Somente leitura.

Sintaxe : expression.Item (Index)

Index: Especifica a posição de um elemento da coleção.

Dim pvtlnItem As PivotLine
Set pvtlnItem = ActiveCell.PivotTable.PivotColumnAxis.PivotLines(Index:=1)

PivotLines.Parent

Retorna o objeto pai do objeto PivotLines especificado. Somente leitura.