Propiedad PivotTable.VisualTotals (Excel)

True (valor predeterminado) para que las tablas dinámicas OLAP (Online Analytical Processing) actualicen los totales cuando se oculte un elemento de la vista. Boolean de lectura y escritura.

Sintaxis

expresión. VisualTotals

Expresión Variable que representa un objeto PivotTable .

Comentarios

En las tablas dinámicas que no son del tipo OLAP, cuando se oculta un elemento el total se actualiza de modo que sólo refleje los elementos que permanecen visibles en la tabla dinámica. En una tabla dinámica OLAP, el total se calcula en el servidor y, por consiguiente, no se ve afectado por los elementos que se oculten en la vista de la tabla dinámica. Sin embargo, si la propiedad VisualTotals se establece en False para una tabla dinámica OLAP, los resultados de la tabla dinámica OLAP coincidirán con los de la tabla dinámica que no sea OLAP.

Para las tablas dinámicas OLAP, una propiedad VisualTotals establecida en True (valor predeterminado) funcionará de la misma manera que lo explicado para las tablas dinámicas no OLAP.

La propiedad VisualTotals devuelve True para todas las tablas dinámicas nuevas. Sin embargo, si abre un libro en la versión actual de Microsoft Excel y la tabla dinámica se ha creado en una versión anterior de Excel, la propiedad VisualTotals devolverá False.

Nota:

Todas las tablas dinámicas creadas anteriormente tienen la propiedad VisualTotals establecida en False de forma predeterminada, a menos que el usuario la cambie, pero para todas las tablas dinámicas recién creadas, la propiedad VisualTotals se establece en True.

Ejemplo:

En este ejemplo se determina si la capacidad de retotalar después de que un elemento se ha ocultado de la vista está disponible para las tablas dinámicas OLAP y se lo notifica al usuario. Se supone que existe una tabla dinámica en la hoja de cálculo activa.

Sub CheckVisualTotals() 
 
 Dim pvtTable As PivotTable 
 
 Set pvtTable = ActiveSheet.PivotTables(1) 
 
 ' Determine if visual totals is enabled for OLAP PivotTables. 
 If pvtTable.VisualTotals = True Then 
 MsgBox "Ability enabled to re-total after an item " & _ 
 "has been hidden from view." 
 Else 
 MsgBox "Unable to re-total items not hidden from view." 
 End If 
 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.