Classe SlicerItem (Excel VBA)

La classe SlicerItem représente un élément d’un segment.

Set

Pour utiliser une variable de classe SlicerItem, elle doit d'abord être instanciée, par exemple

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

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe SlicerItem : Slicer.ActiveItem, SlicerItems.Item, SlicerCache.SlicerItems, SlicerCache.VisibleSlicerItems et SlicerCacheLevel.SlicerItems

For Each

Voici un exemple de traitement des éléments SlicerItem dans une collection

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

Thèmes

Les procédures suivantes de cette classe ont été regroupées et sont décrites sur une page thématique séparée

Name with its procedures SourceName et SourceNameStandard

Propriétés

Caption Renvoie le texte de l’étiquette de l’élément de segment. En lecture seule.

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

HasData Spécifie si l’élément de segment contient des données correspondant à l’état du filtre manuel actuel. En lecture seule.

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

Name Renvoie le nom de l’élément de segment. En lecture seule.

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

Parent Renvoie l’objet SlicerCache parent de l’élément de segment. En lecture seule.

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

Selected Renvoie ou définit si l’élément de segment est sélectionné. En lecture/écriture pour les segments connectés à des sources de données autres que OLAP. En lecture seule pour les segments connectés à des sources de données OLAP.

ActiveWorkbook.ActiveSlicer.ActiveItem.Selected = True

Value Renvoie la valeur de l’élément de segment. En lecture seule.

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

SlicerItems.Count Renvoie le nombre d’objets de la collection. En lecture seule.

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

SlicerItems.Item Renvoie un objet SlicerItem à partir d’une collection. En lecture seule.

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

SlicerItems.Parent Renvoie l’objet parent SlicerCache pour l’objet spécifié. En lecture seule.

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