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")