VisualTotals 属性 - Microsoft Excel Visual Basic 2002 参考

返回介绍

VisualTotals 属性

发布于 2019-08-07 字数 1988 浏览 988 评论 0

全部显示

VisualTotals 属性

如果为 True (默认),则在视图中隐藏了项目后,联机分析处理 (OLAP) 数据透视表将重新汇总。Boolean 类型,可读写。

expression.VisualTotals

expression 必需。该表达式返回一个 PivotTable 对象。

说明

在非 OLAP 数据透视表中,如果隐藏了项目,则将重新进行汇总以只反映数据透视表中剩余的可见项目。在 OLAP 数据透视表中,汇总将在服务器上进行,因此无论数据透视表中是否隐藏了项目,都不会影响汇总。但是,如果 OLAP 数据透视表的 VisualTotals 属性为 False,那么 OLAP 数据透视表的结果将与非 OLAP 数据透视表的结果相匹配。

对于 OLAP 数据透视表,当VisualTotals 属性为 True (默认)时,其工作方式与非 OLAP 数据透视表中描述的一样。

所有新的数据透视表的 VisualTotals 属性返回 True。但是,如果在 Microsoft Excel 的当前版本中打开工作簿,并且已在 Excel 的上一个版本中创建了数据透视表,那么 VisualTotals 属性将返回 False

注意 默认情况下,所有以前创建的数据透视表的 VisualTotals 属性将设置为 False,除非用户更改它,但是对于新创建的数据透视表,其 VisualTotals 属性设置为 True

示例

本示例确定在隐藏了视图中的项目后,数据透视表是否能重新进行汇总,并通知用户。本示例假定数据透视表位于活动工作表上。

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

上一篇:VisibleRange 属性

下一篇:VPageBreaks 属性

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

支持 Markdown 语法,需要帮助?

目前还没有任何评论,快来抢沙发吧!