如何“将此数据添加到数据模型?”并使值不同的数据?

时间:2017-03-31 12:54:20

标签: excel vba excel-vba pivot-table distinct

我正在使用Excel 2016,我有代码从我的数据集创建PivotTable。但是,我不确定如何在数据模型中包含数据(这是从“插入”选项卡中单击“数据透视表”时看到的选项。

我的目标是在值数据字段中使用我正在使用的变量的不同计数。

With PvtTbl.PivotFields("sid")
    .Orientation = xlDataField
    .Function = xlSum
    .NumberFormat = "#,##0"
    .Position = 1

我尝试用"xlSum"替换"xlDistinct",但当然这太容易了哈哈。

1 个答案:

答案 0 :(得分:0)

请注意,使用数据模型pivot的vba编码与源于正常数据范围的pivot完全不同,您可以在清空数据字段后使用以下代码:

    With PvtTbl
    .AddDataField .CubeFields("[Measures].[Distinct Count of sid]"), "Distinct Count of sid"
    End With