Klasse SlicerPivotTables (Excel VBA)

Die Klasse SlicerPivotTables stellt Informationen zur Auflistung von PivotTables dar, die dem angegebenen SlicerCache -Objekt zugeordnet sind. Um eine SlicerPivotTables -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

Dim spts as SlicerPivotTables
Set spts = ActiveWorkbook.SlicerCaches(1).PivotTables

AddPivotTable

Fügt einen Verweis auf eine PivotTable für die SlicerPivotTables-Auflistung hinzu.

Wenn eine PivotTable der SlicerPivotTables-Auflistung hinzugefügt wird, kann sie nach ihrem übergeordneten SlicerCache und den ihm zugeordneten Datenschnitten gefiltert werden.

AddPivotTable (PivotTable)

PivotTable: Ein PivotTable -Objekt, das die hinzuzufügende PivotTable darstellt.

Dim pvts As SlicerPivotTables 
Set pvts = ActiveWorkbook.SlicerCaches("Slicer_Customer").PivotTables 
pvts.AddPivotTable(ActiveSheet.PivotTables("PivotTable1"))

Count

Gibt die Anzahl der Objekte in der Auflistung zurück.

Dim lngCount As Long
lngCount = ActiveWorkbook.SlicerCaches(1).PivotTables.Count

Item

Gibt ein einzelnes PivotTable -Objekt aus der Auflistung zurück.

Item (Index)

Index: Der Name oder die Indexnummer des Objekts.

Dim pvtItem As PivotTable
Set pvtItem = ActiveWorkbook.SlicerCaches(1).PivotTables(Index:=1)

RemovePivotTable

Entfernt einen Verweis auf eine PivotTable aus der SlicerPivotTables-Auflistung.

Wenn eine PivotTable aus der SlicerPivotTables -Auflistung entfernt wird, wird Sie nicht mehr nach dem übergeordneten SlicerCache -Objekt und den ihm zugeordneten datenschnitten gefiltert.

RemovePivotTable (PivotTable)

PivotTable: Ein PivotTable -Objekt, das die zu entfernende PivotTable darstellt, oder der Name oder Index der PivotTable in der Auflistung.

Dim pvts As SlicerPivotTables 
Set pvts = ActiveWorkbook.SlicerCaches("Slicer_Customer").PivotTables 
pvts.RemovePivotTable("PivotTable1")