在EXCEL表格中要把相同颜色的单元格汇总在一起，该如何 *** 作

1原始数据有多个颜色，无规律的间隔标注。需要将同样颜色的单元格排列到一起。

2选中全部数据区域，选择数据-筛选。

3执行自动筛选后，第一行的标题每个单元格会出现下拉按钮。

4点击一个标题下拉按钮，选择按颜色排序，在右侧的菜单中选择第一个**。

5这样，所有**单元格就排列在一起，并显示在顶端。

6同样方法，选择第二个颜色蓝色。

7这时，所有蓝色的单元格将被排列在一起，并显示在最上端。此时**单元格仍然在一起，只不过是显示在蓝色单元格的下方。

8以此类推，依次选择待筛选颜色，执行完毕后所有相同颜色的单元格都将被排列在一起。无填充色的单元格被排列在数据区域最下方。

用下面的代码，检测到C3至Z93任何一个单元格发生数据更新，就会自动对该列进行计算，

结果显示在同一列的94行单元格里。

Private Sub Worksheet_Change(ByVal Target As Range)

    x = TargetRow 'x是有数据更新的单元格的行序号

    y = TargetColumn 'y是有数据更新的单元格的列序号

    If x >= 3 And x <= 93 And y >= 3 And y <= 26 Then '如果x是第3至93行，y是第3至26列，那么

        Dim i As Integer

        s = 0 '变量s初始化

        For i = 3 To 93 '遍历3至93

            If Cells(i, y)InteriorColorIndex <> xlNone Then '如果y列i行单元格颜色不等于无色

                s = s + Cells(i, y) '，那么把该单元格的数值累加给s

            End If

        Next '返回进入下一次For循环

        Cells(94, y) = s '最后给y列94行单元格输出结果：等于s

    End If

End Sub