作者：乔山办公网日期：
返回目录：excel表格制作
不用分类汇总，用数据透视表，能更好解决问题
数据透视表步骤：
1.选择数据区域，插入数据透视表：
2.设置如下：
3.确定后，右侧设置如下：
4.结果如图：
使用百VBA可以度轻松解问决：答
Sub 汇总专属()
Dim x, y As Integer
y = 2
For x = 2 To 10000
If Cells(y, 4) <> "" Then Cells(y, 4) = Cells(y, 4) & "，" & Cells(x, 2)
If Cells(y, 4) = "" Then Cells(y, 4) = Cells(x, 2)
If Cells(x, 1) <> Cells(x + 1, 1) Then
Cells(y, 3) = Cells(x, 1)
y = y + 1
End If
If Cells(x, 1) = "" Then Exit For
Next x
End Sub
建立多级分类汇总，
或者改用数据透视表，
分类汇总的功能， 数据透视表 基本上都可以取代,
很麻烦，要用到宏录制。
为什么不用数据透视表，可实现相同效果。