Excel数据透视图VBA设置行标签不加总，是无

在Excel的数据透视表中，如果通过VBA（Visual Basic for Applications）来设置行标签不显示求和项，通常是在创建PivotTable之后，直接操作字段的汇总方式。你可以使用`PivotFields`对象来修改每个字段的行为。

以下是简单的VBA代码示例：

Sub SetRowLabelsNoSum()
    Dim pt As PivotTable
    Dim pf As PivotField
    
    ' 获取工作表中的数据透视表
    Set pt = ThisWorkbook.Sheets("Sheet1").PivotTables(1) ' 确保替换为实际的工作表和数据透视表名称
    
    ' 遍历所有行标签（假设它们是数据透视表的第一列）
    For Each pf In pt.PivotFields
        If pf.Name = "你的行标签字段名" Then ' 替换为实际的字段名
            ' 设置汇总方式为"值字段设置"
            pf.ValueFieldSettings.ShowValueTotal = False
        End If
    Next pf
End Sub

这个脚本会找到名为“你的行标签字段名”的字段，并将其汇总方式设置为不显示求和。运行该宏后，行标签将不再有默认的求和总和。