Klasse PivotLine (Excel VBA)

Bei einem PivotLine-Objekt handelt es sich um eine Reihe von Zeilen oder Spalten in einer Excel-PivotTable.

Set

Um eine PivotLine -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

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

Die folgenden Prozeduren können zum Festlegen der PivotLine Klassenvariablen verwendet werden : PivotCell.PivotColumnLine, PivotCell.PivotRowLine, PivotField.AutoSortPivotLine, PivotLines.Item und PivotAxis.PivotLines

For Each

Hier ist ein Beispiel für die Verarbeitung der PivotLine -Elemente in einer Sammlung

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

LineType

Gibt eine XlPivotLineType -Konstante zurück, die den Typ der pivotlinie angibt.

Möglichen Werte sind xlPivotLineBlank - Leere Zeile nach jeder Gruppe, xlPivotLineGrandTotal - Zeile mit Gesamtsumme, xlPivotLineRegular - Normale PivotLine mit Pivot-Elementen, xlPivotLineSubtotal - Zeile mit Teilergebnis.
Dim xplLineType As XlPivotLineType
xplLineType = ActiveCell.PivotCell.PivotColumnLine.LineType

Parent

Gibt das übergeordnete Objekt für das angegebene PivotLine-Objekt zurück.

PivotLineCells

Gibt eine Auflistung von PivotCell -Objekten in einer pivotlinie zurück.

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

PivotLineCellsFull

Ruft alle Pivot -Zellen einschließlich der in kompakter Form ausgeblendeten ab.

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

Position

Gibt die Position des PivotLine-Objekts zurück oder legt diese fest.

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

PivotLines.Count

Gibt die Anzahl der Elemente in der PivotLines -Auflistung zurück.

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

PivotLines.Item

Gibt ein bestimmtes Element des PivotLines-Auflistungsobjekts anhand seiner Position in der Auflistung zurück.

Syntax : expression.Item (Index)

Index: Gibt die Position eines Elements der Auflistung an.

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

PivotLines.Parent

Gibt das übergeordnete Objekt für das angegebene PivotLines-Objekt zurück.