Workbook.ActiveSlicer (Excel)

Devuelve un objeto que representa la segmentación de datos activa en el libro activo o en el libro especificado. Devuelve Nothing si no hay ninguna segmentación de datos activa. Solo lectura.

Si no se especifica un objeto Workbook, la propiedad devuelve la segmentación de datos activa del libro activo.

Dim slcActiveSlicer As Slicer
Set slcActiveSlicer = ActiveWorkbook.ActiveSlicer