如何快速批量合并同类项

天边2021

问题如图所示，请大神赐教!

小凡、、、

用wps或者找个插件，会用vba代码也行

cyh3230

你可以尝试利用一下excel的固有功能, 分类汇总

HAOQ

1. Sub merge()
   
2. Dim i As Long
   
3. Dim str As String
   
4. Dim rng As Range
   
5. Application.DisplayAlerts = False
   
6. Application.ScreenUpdating = False
   
7. str = Cells(2, 2)
   
8. Set rng = Cells(2, 2)
   
9.     For i = 2 To 26
   
10.         If Cells(i, 2) = Cells(i + 1, 2) Then
    
11.             Set rng = Union(rng, Cells(i, 2))
    
12.         Else
    
13.             rng.merge
    
14.             str = Cells(i, 2).Value
    
15.             Set rng = Cells(i, 2)
    
16.         End If
    
17.     Next
    
18. Application.DisplayAlerts = True
    
19. Application.ScreenUpdating = True
    
20. End Sub
    

复制代码

sobili

用数据透视表。

wdy895

数据透视表最简单，也快！