Excel利用VBA一键批量合并某列相同单元格

1、打开Excel表格，看到A列有相同的省份

2、打开开发工具中的VB模块

3、在thisworkbook中输入如下代码     Sub 合并相同用单元格()     Dim l%, i%     Application.DisplayAlerts = False     k% = InputBox("请输入合并单元格所在列")     l = [A65536].End(xlUp).Row     For i = l To 2 Step -1         If Cells(i, k) = Cells(i - 1, k)   Then         Range(Cells(i - 1, k), Cells(i,   k)).Merge         End If     Next     Application.DisplayAlerts = True     End Sub

4、选择开发工具中的宏按钮

5、选择对应宏代码，单击执行

6、弹出对话框，输入合并的列

7、即可看到A列相同单元格进行了合并

8、最后保存文件即可

9、办公经验将持续更新，感谢您点击右下角的分享

10、办公经验将持续更新，感谢您点击左下角的点赞

11、办公经验将持续更新，感谢您点击左下角的投票

12、办公经验将持续更新，感谢您点击右上角的关注