Workbook.ActiveSlicer (Excel)

Retorna um objeto que representa a segmentação de dados ativa da pasta de trabalho ativa ou da pasta de trabalho especificada. Retorna Nada, se não houver nenhuma segmentação de dados ativa. Somente leitura.

Se você não especificar um objeto Workbook, esta propriedade retornará a segmentação de dados ativa da pasta de trabalho ativa.

Dim slcActiveSlicer As Slicer
Set slcActiveSlicer = ActiveWorkbook.ActiveSlicer