Classe PivotLines (Excel VBA)

O objeto PivotLines é uma coleção de linhas em uma tabela dinâmica, contendo todas as linhas em linhas ou colunas da tabela dinâmica. Cada linha é um conjunto de objetos PivotCell . Para usar uma variável de classe PivotLines, ela primeiro precisa ser instanciada por exemplo

Dim pls as PivotLines
Set pls = ActiveCell.PivotTable.PivotColumnAxis.PivotLines

For Each

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

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

Count

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

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

Item

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

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)