Classe SlicerItem (Excel VBA)

A classe SlicerItem representa um item em uma segmentação de dados.

Set

Para usar uma variável de classe SlicerItem, ela primeiro precisa ser instanciada por exemplo

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

Os procedimentos a seguir podem ser usados ​​para definir variáveis ​​do tipo SlicerItem: Slicer.ActiveItem, SlicerItems.Item, SlicerCache.SlicerItems, SlicerCache.VisibleSlicerItems e SlicerCacheLevel.SlicerItems

For Each

Aqui está um exemplo de processamento dos itens SlicerItem em uma coleção.

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

Temas

Os procedimentos a seguir nesta aula foram agrupados e são descritos em uma página de tema separada

Name with its procedures SourceName e SourceNameStandard

Propriedades

Caption Retorna o texto do rótulo do item da segmentação de dados. Somente leitura.

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

HasData Retorna se o item da segmentação de dados contém dados que correspondem ao estado atual do filtro manual. Somente leitura.

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

Name Retorna o nome do item da segmentação de dados. Somente leitura.

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

Parent Retorna o objeto SlicerCache pai do item de segmentação de itens. Somente leitura.

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

Selected Retorna ou define se o item da segmentação de dados está selecionado. Leitura/gravação para segmentações de dados conectadas a fontes de dados não-OLAP. Somente leitura para segmentações de dados conectadas a fontes de dados OLAP.

ActiveWorkbook.ActiveSlicer.ActiveItem.Selected = True

Value Retorna o valor do item da segmentação de dados. Somente leitura.

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

SlicerItems.Count Retorna o número de objetos da coleção. Somente leitura.

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

SlicerItems.Item Retorna um objeto SlicerItem de uma coleção. Somente leitura.

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

SlicerItems.Parent Retorna o objeto SlicerCache pai do objeto especificado. Somente leitura.

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