Filtrar tabla dinámica por vba
Publicado por Antonio25 (1 intervención) el 23/06/2020 17:14:39
Buenas tardes.
¿Alguien puede ayudarme? Mi macro falla en la parte "Set slSlicer = wsHoja.Parent.SlicerCaches(slicer_cache)" creo que debido a el nombre "slicer_cache". Slicer_cache es un vector con varios valores, por ejemplo, 1 , 4 y 8.
Os dejo parte del código. En cada iteración la macro filtra por un valor que se encuentra en el caché de slicers del libro excel
¿Como podría solucionarlo?
Muchas gracias
¿Alguien puede ayudarme? Mi macro falla en la parte "Set slSlicer = wsHoja.Parent.SlicerCaches(slicer_cache)" creo que debido a el nombre "slicer_cache". Slicer_cache es un vector con varios valores, por ejemplo, 1 , 4 y 8.
Os dejo parte del código. En cada iteración la macro filtra por un valor que se encuentra en el caché de slicers del libro excel
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub FilterPivotTable(wsHoja As Worksheet, slicer_cache As Variant)
Dim ptTable As PivotTable
Dim slDummy As SlicerItem
Dim slSlicer As SlicerCache
'Definir Tabla dinamica y Segmentación de datosSet ptTable = wsHoja.PivotTables(1)
Set slSlicer = wsHoja.Parent.SlicerCaches(slicer_cache)
'Set slSlicer = wsHoja.Parent.SlicerCaches(4) probando a meter el valor 4 sí que funciona, pero cuando el parámetro "slicer_cache" tiene el valor 4 la macro falla...... el código continua.
¿Como podría solucionarlo?
Muchas gracias
Valora esta pregunta
0