excel中如何快速、批量合并具有共同单元格的若干行

2022-08-22 教育 105阅读

Excel可以利用VBA实现快速、批量合并具有相同单元格的若干行。

软件版本:Office2007

方法如下:

1.如果上下单元格数值相同,就合并单元格:

2.Alt+F11,输入代码如下:

Sub m()

Application.DisplayAlerts = False '避免合并单元格时出现提示

For i = Range("A65536").End(3).Row To 2 Step -1 '从最后一行到倒数第二行循环

If Cells(i, "A") = Cells(i - 1, "A") Then '如果上下两个单元格值相同

Range("A" & i - 1 & ":A" & i).Merge '那么就合并这两个单元格

End If

Next i

Application.DisplayAlerts = True

End Sub

3.F5执行代码,结果如下:

声明:你问我答网所有作品(图文、音视频)均由用户自行上传分享,仅供网友学习交流。若您的权利被侵害,请联系fangmu6661024@163.com