Klasse PivotFilters (Excel VBA)

Das PivotFilters -Objekt ist eine Auflistung von PivotFilter -Objekten. Um eine PivotFilters -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim pfs as PivotFilters
Set pfs = ActiveCell.PivotTable.ActiveFilters

For Each

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

Dim pvtfil As PivotFilter
For Each pvtfil In ActiveCell.PivotTable.PivotFilters
	
Next pvtfil

Add2

Add2 (Type, DataField, Value1, Value2, Order, Name, Description, MemberPropertyField, WholeDayFilter)

Dim pvtfilAdd2 As PivotFilter
Set pvtfilAdd2 = ActiveCell.PivotTable.ActiveFilters.Add2(Type:=xlAfter)

Arguments

Ein benanntes Argument

Type - XlPivotFilterType

Dies sind mögliche Werte für XlPivotFilterType

Optional arguments

Die folgenden Argumente sind optional

DataField

Value1

Value2

Order

Name - String

Description - String

MemberPropertyField

WholeDayFilter

Count

Gibt die Anzahl der Elemente der PivotFilters-Auflistung zurück.

Dim lngCount As Long
lngCount = ActiveCell.PivotTable.ActiveFilters.Count

Item

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

Item (Index)

Index: Gibt die Position eines Elements der Auflistung an.

Dim pvtfilItem As PivotFilter
Set pvtfilItem = ActiveCell.PivotTable.ActiveFilters(Index:=1)