excel表中如何合并相同的数据，其他的内容都保留

Question

如题所述

Answer 1

可以用vba实现。代码如下。
Sub 合并()
Application.ScreenUpdating = False
Application.DisplayAlerts = False
On Error Resume Next
m = [E65536].End(xlUp).Row
x = Cells(2, 5): j = 1: z = 0
For i = 3 To m
y = Cells(i, 5)
If x <> y Then
x = y
If j > 1 Then Range(Cells(z, 5), Cells(z + j - 1, 5)).MergeCells = True: j = 1
Else
j = j + 1
If j = 2 Then z = i - 1
End If
Next i
Application.DisplayAlerts = True
Application.ScreenUpdating = True
MsgBox "相同数据合并完成！"
End Sub追问

我不会的，其他的方法有吗？

追答

单纯用函数不可以实现的。你不会vba，可以把样表发给我我给你设置好vba，以后你只需把数据粘贴进去，点击按钮瞬间就可以完成你说的要求。

Answer 2

用数据透视表可以实现您的需求。追问

具体的步骤有吗

追答

步骤：插入-数据透视频表-选定数据源-选定需要放数透表的位置-确定，然后跟据您的需要点先项目，以及需要汇总的数量等。里面会自动合并相同项的。