Excel - Propiedad .ManualUpdate

Investigando acerca de una consulta que abrí la semana pasada, he encontrado una posible solución para resolver mi problema. Creo que la solucion pasa por usar la propiedad ".ManualUpdate = False" y ".ManualUpdate=True" sobre la tabla Dinámica. Sin embargo, debido a mi torpeza, no soy capaz de aplicarla correctamente y me da error. ¿Alguien sabe como se aplica esta propiedad sobre el ejemplo que abajo detallo?

Gracias

Hola,

Para una tabla dinámica en la que quiero calcular un dato mensual acumulado hago el siguiente filtrado de meses:

(ej; Abril)

With ActiveSheet.PivotTables("Tabla dinámica1").PivotFields("MES")

.PivotItems("0").Visible = True
.PivotItems("1").Visible = True
.PivotItems("2").Visible = True
.PivotItems("3").Visible = True
.PivotItems("4").Visible = True
.PivotItems("5").Visible = False
.PivotItems("6").Visible = False
.PivotItems("7").Visible = False
.PivotItems("8").Visible = False
.PivotItems("9").Visible = False
.PivotItems("10").Visible = False
.PivotItems("11").Visible = False
.PivotItems("12").Visible = False

End With

Con este código consigo obtener bien el resultado, pero como quiera que la Tabla Dinámica tiene como fuente de datos externos una tabla Access con millones de datos, hace que este proceso sea muy lento, ya que recalcula la Tabla Dinamica para cada PivotItem (12 veces). ¿Hay algún código que que fije todos los PivotItems que yo deseo al mismo tiempo?

Gracias

Jose

Te respondi (nuevamente) en emagister

Abraham