一、手动分组

1）选中要隐藏的数据

2）点击「数据」选项卡里的「组合」功能

选择列就好了

以此类推，可以分别手动做后面数据得分组

3）缩小后效果

先展开看，只要点击上面＋号就可以了

这样可以分段缩小展开，缩小显示总体信息，展开显示明细信息，完美

点击这个1，2就能全部缩小，全部展开了

二、自动分组功能

如果时间比较多，手工觉得很慢，我们可以利用Excel自带得自动分组功能

需要我们在分组前面做一个subtotal公式

在缩小前面C1单元格做个公式，=SUBTOTAL(9,D1:J1)

然后复制这个公式到L1, U1单元格前面

然后，点击「数据」选项卡里的「自动建立分级显示」

发现自动就搞定了

这种可能你会觉得还是慢，怎么办？

Vba来搞定吧，写几行代码就能轻松实现这个功能了，还可以设置多级

1）先设置缩放级别

需要隐藏的我们设置成2级就好了，在第一行输入2

2）ALT+F11进入VBE编辑器，点击「插入」选项卡，点击「模块」

复制下面代码

Sub TestSub()

Dim i, lastCol

Cells.Ungroup '取消全部分组

'找到最后一列数据

lastCol = Cells(1, Cells.Columns.Count).End(xlToLeft).Column

For i = 2 To lastCol '从第2列开始循环

If Cells(1, i).Value <> '' Then '第一行单元格里要写数据了

Columns(i).OutlineLevel = Cells(1, i).Value '设置分组级别

End If

End Sub

3）执行代码

点击这个播放按钮好了

4）我们来看看设置成多级效果

现在是三级分组了，想设几级太简单了

本站仅提供存储服务，所有内容均由用户发布，如发现有害或侵权内容，请点击举报。