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

今日将演示如何运用VBA在Excel中实现对特定列的自动批量合并，附有动态展示与详细步骤解析。

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、 办公经验将持续更新，感谢您点击左下角的投票