Klasse SlicerItem (Excel VBA)

Die Klasse SlicerItem stellt ein Element in einem Datenschnitt dar.

Set

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

Dim slcite as SlicerItem
Set slcite = ActiveWorkbook.ActiveSlicer.ActiveItem

Die folgenden Prozeduren können zum Festlegen der SlicerItem Klassenvariablen verwendet werden : Slicer.ActiveItem, SlicerItems.Item, SlicerCache.SlicerItems, SlicerCache.VisibleSlicerItems und SlicerCacheLevel.SlicerItems

For Each

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

Dim slcite As SlicerItem
For Each slcite In ActiveWorkbook.SlicerItems
	
Next slcite

Themas

Die folgenden Prozeduren in dieser Klasse wurden zusammengefasst und auf eine separate Themenseite beschrieben

Name with its procedures SourceName und SourceNameStandard

Eigenschaften

Caption Gibt den Beschriftungstext des Datenschnittelements zurück.

Dim strCaption As String
strCaption = ActiveWorkbook.ActiveSlicer.ActiveItem.Caption

HasData Gibt zurück, ob das Datenschnittelement Daten enthält, die dem aktuellen manuellen Filterzustand entsprechen.

Dim booHasData As Boolean
booHasData = ActiveWorkbook.ActiveSlicer.ActiveItem.HasData

Name Gibt den Namen des Datenschnittelements zurück.

Dim strName As String
strName = ActiveWorkbook.ActiveSlicer.ActiveItem.Name

Parent Gibt das übergeordnete SlicerCache -Objekt für das Slicer-Element zurück.

Dim slcParent As SlicerCache
Set slcParent = ActiveWorkbook.ActiveSlicer.ActiveItem.Parent

Selected Gibt zurück oder legt fest, ob das Datenschnittelement ausgewählt ist.

ActiveWorkbook.ActiveSlicer.ActiveItem.Selected = True

Value Gibt den Wert des Datenschnittelements zurück.

Dim strValue As String
strValue = ActiveWorkbook.ActiveSlicer.ActiveItem.Value

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

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

SlicerItems.Item Gibt ein SlicerItem -Objekt aus einer Auflistung zurück.

Dim slciteItem As SlicerItem
Set slciteItem = ActiveWorkbook.SlicerCaches(1).SlicerItems(Index:=1)

SlicerItems.Parent Gibt das übergeordnete SlicerCache -Objekt für das angegebene Objekt zurück.

Dim slcParent As SlicerCache
Set slcParent = ActiveWorkbook.SlicerCaches(1).SlicerItems.Parent