乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > 怎么把<em>excel</em>表格里面相同数据求和然后删除重复项-excel 去除重复项求和

怎么把<em>excel</em>表格里面相同数据求和然后删除重复项-excel 去除重复项求和

作者:乔山办公网日期:

返回目录:excel表格制作


先把你的数据排好序。就和你贴出来的这636f70797a64366样。
然后按ALT+F11,进入VBE,假设你的表是sheet1,双击sheet1,复制下面的代码。
Sub bb()
Dim irow As Integer, icol As Integer

irow = ActiveSheet.UsedRange.Rows.Count
icol = 2

ActiveSheet.Range(ActiveSheet.Cells(1, icol + 1), ActiveSheet.Cells(2, icol + 2)).ClearContents

Application.ScreenUpdating = False

Dim k As Integer
Dim c As Range
With ActiveSheet
k = 3
.Range(.Cells(1, icol + 1), .Cells(2, icol + 2)).Value = .Range("A1:B2").Value
For Each c In .Range(.Cells(3, 1), .Cells(irow, 1))
If StrComp(c.Text, .Cells(k - 1, icol + 1).Text, vbTextCompare) <> 0 Then
.Cells(k, icol + 1).Value = c.Value
.Cells(k, icol + 2).Value = c.Offset(0, 1).Value
k = k + 1
Else
.Cells(k - 1, icol + 2).Value = .Cells(k - 1, icol + 2).Value + c.Offset(0, 1).Value
End If
Next
End With
Application.ScreenUpdating = True
End Sub

关闭VBE,回到sheet1,按ALT+F8
选择bb执行即可

  • 复制需要删除重复项的内容,粘贴到右边的单元格,如图所

  • 选中复制好的内容

  • 菜单栏点击数据,删除重复项(版本不一样可能按钮具体位置不太一样)

  • 弹出框点击删除重复项按钮,得到每项的唯一值

  • 在“吃饭”右面的单元格输入公式“sumif()”(这里的括号只输入左边的就可以了)

  • 用鼠标选中原来的数据(需要把所有的框柱),输入“,”点击“吃饭”,接着再输入“,”框选金额,按“回车键”

  • 选中刚刚算出的单元格,鼠标在单元格右下角变成实心的十字时,下拉,得到想要的求和

  • 想要用这些数据的时候,复制,选择性粘贴,点击值和数字格式,确定,就可以复制出来了,这些数据就可以随意操作了


你是07么 07的话框选时间,姓名两列 选择删除重复项



如果不想用公式的话copy,有的简单的方法,
先找出重复项,删除,然后求和.
如何找出重复项:你说的两列假设是A列和B列,找一空白列,里面的内容填 =A&B,第四列都是填1,合并计算,如图,计算结果不是1的说明是重复项,删掉就好。

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网