Excel如何快速合并相同内容单元格？

1、打开Excel数据表，如下图所示，A列中有很多内容一样的单元格，将内容相同的单元格合并成一个。

2、按下Alt+F11，打开VBA编辑界面，双击左侧数据所在的工作表，出现右侧代码编辑区，如下图所示。

3、输入代码：

Sub 鱼木混猪()

Application.DisplayAlerts = False

For i = Range("A65536").End(3).Row To 2 Step -1

If Range("A" & i) = Range("A" & i - 1) Then

Range("A" & i & ":A" & i - 1).Merge

End If

Next

Application.DisplayAlerts = True

End Sub

代码通过循环依次从下往上合并相邻两个内容相同的单元格，如下图所示。

4、点击代码中的任意位置，然后点击“运行子程序”按钮，如下图所示。

5、关闭VBA界面，返回Excel，可以看到所有相同内容的单元格都合并到成一个了，如下图所示。

1、1.打开数据表；

2.按下Alt+F11，双击工作表；

3.输入代码，核心代码：

Range("A" & i & ":A" & i - 1).Merge

4.点击“运行子程序”；

5.Excel中所有相同内容单元格就合并到一块了。