怎样将EXCEL表格中的重复项删掉,删掉之前先将重复项的数值先相加例如：07Y-83-11000AD　　　3　　　07Y-83-11000AD\x053　　　07Y-83-38000D\x056　　　07Y-83-38000D\x056将上面的重复项先数量相加,再将重

怎样将EXCEL表格中的重复项删掉,删掉之前先将重复项的数值先相加例如：07Y-83-11000AD　　　3　　　07Y-83-11000AD\x053　　　07Y-83-38000D\x056　　　07Y-83-38000D\x056将上面的重复项先数量相加,再将重
怎样将EXCEL表格中的重复项删掉,删掉之前先将重复项的数值先相加
例如：07Y-83-11000AD　　　3
　　　07Y-83-11000AD\x053
　　　07Y-83-38000D\x056
　　　07Y-83-38000D\x056
将上面的重复项先数量相加,再将重复项删掉

怎样将EXCEL表格中的重复项删掉,删掉之前先将重复项的数值先相加例如：07Y-83-11000AD　　　3　　　07Y-83-11000AD\x053　　　07Y-83-38000D\x056　　　07Y-83-38000D\x056将上面的重复项先数量相加,再将重
只能编程序,否则就得手工操作,比较麻烦.
假设有A、B两列数据,程序如下：
Sub Test()
Dim i As Long
Dim iRang As Range
i = 2
Do
For Each iRang In Range("A1:A" & i - 1)
If Range("A" & i).Value = iRang.Value Then
iRang.Offset(0,1).Value = iRang.Offset(0,1).Value + Range("B" & i).Value
Rows(i & ":" & i).Select
Selection.Delete Shift:=xlUp
GoTo NextDO
End If
Next
i = i + 1
NextDO:
Loop Until Range("A" & i).Value = ""
End Sub