Visualizar elementos de Tabla Dinamica

hola, Luis Arturo !

... ocultar y visualizar elementos de ... una tabla dinamica a traves de una macro
... ocultarla no hay problema, lo hago con esta instruccion:
ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Sem").PivotItems("1").Visible = false
... para volverla a mostrar intento hacerlo asi:
ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("Sem").PivotItems("1").Visible = True
... no funciona, ¿Que estoy haciendo mal?

- 'entre-comillar' el nombre/indice del elemento =>.PivotItem("1")< 'supone' que se trata =>del nombre<= del elemento
en caso contrario [posicion por indice] las comillas no se requieren ;)
- si ya te ha funcionado el 'ocultarlo'... =>debiera funcionar tambien<= para 'mostrarlo' ;)
[en tu mensaje anterior] no mencionas cual es el error que obtienes [?]

¿comentas datos adicionales?
saludos,
hector.