Classe PivotLine (Excel VBA)

Un objet PivotLine est une ligne de lignes ou de colonnes d'un tableau croisé dynamique Excel.

Set

Pour utiliser une variable de classe PivotLine, elle doit d'abord être instanciée, par exemple

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

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe PivotLine : PivotCell.PivotColumnLine, PivotCell.PivotRowLine, PivotField.AutoSortPivotLine, PivotLines.Item et PivotAxis.PivotLines

For Each

Voici un exemple de traitement des éléments PivotLine dans une collection

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

LineType

Renvoie une constante XlPivotLineType qui indique le type de la ligne de tableau croisé dynamique. En lecture seule.

Valeurs possibles sont xlPivotLineBlank - Ligne vide après chaque groupe, xlPivotLineGrandTotal - Ligne de total général, xlPivotLineRegular - Ligne croisée dynamique normale, avec des éléments de tableau croisé dynamique, xlPivotLineSubtotal - Ligne de sous-total.
Dim xplLineType As XlPivotLineType
xplLineType = ActiveCell.PivotCell.PivotColumnLine.LineType

Parent

Cette propriété renvoie l'objet parent de l'objet PivotLine spécifié. En lecture seule.

PivotLineCells

Renvoie une collection d’objets PivotCell dans une ligne de tableau croisé dynamique. En lecture seule.

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

PivotLineCellsFull

Récupère toutes les cellules PivotLine , y compris celles qui sont masquées sous forme compacte. En lecture seule.

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

Position

Cette propriété renvoie ou définit la position de l’objet PivotLine. En lecture seule.

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

PivotLines.Count

Renvoie le nombre d’éléments dans la collection PivotLines, . En lecture seule.

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

PivotLines.Item

Cette propriété renvoie un élément spécifique de la collection PivotLines par son emplacement dans la collection. En lecture seule.

Syntaxe : expression.Item (Index)

Index: Spécifie la position d'un élément de la collection.

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

PivotLines.Parent

Cette propriété renvoie l'objet parent de l'objet PivotLines spécifié. En lecture seule.