您好，快速讓相同內(nèi)容的單元格合并有很多種辦法，這里我介紹一種最簡(jiǎn)單，最一勞永逸的方法，使用VBA代碼。

具體步驟如下：

1、打開(kāi)需要合并單元格的文件

2、點(diǎn)擊【開(kāi)發(fā)工具】→Visual Basic打開(kāi)VBA編輯器。

3、右擊鼠標(biāo)插入模塊，將代碼復(fù)制進(jìn)去，關(guān)閉VBA編輯器。具體操作參見(jiàn)如上動(dòng)圖。

相關(guān)代碼如下：

Sub 合并單元格()

Dim i As Integer, j As Integer, rng As Range, x As Integer, rng1 As Range

Application.DisplayAlerts = False

Set rng1 = Selection.Range('a1:a' & Application.CountA(Selection))

i = Application.CountA(rng1)

x = Selection.Range('a1').Row

For j = i + x - 1 To x + 1 Step -1

Set rng = Cells(j, Selection.Column)

If rng = rng.Offset(-1) Then rng.Offset(-1).Resize(2).Merge

Next

Application.DisplayAlerts = True

End Sub

4、選擇需要合并單元格的所有內(nèi)容，點(diǎn)擊【開(kāi)發(fā)工具】→【宏】，選擇名為【合并單元格】的宏，點(diǎn)擊執(zhí)行即可。

5、如果需要取消合并，重復(fù)步驟1-3，將下面的代碼放到VBA編輯器里。

Sub 取消合并單元格()

Dim i As Integer, rng As Range

For Each rng In Selection

i = rng.MergeArea.Count

rng.UnMerge

rng.Resize(i) = rng

Next

End Sub

6、選擇需要取消合并單元格的所有內(nèi)容，點(diǎn)擊【開(kāi)發(fā)工具】→【宏】，選擇名為【取消合并單元格】的宏，點(diǎn)擊執(zhí)行。

公子提醒您：如果希望下次繼續(xù)用這個(gè)文件重命名，請(qǐng)將工作表保存為后綴名為.xlsm的格式。

以上是該問(wèn)題的解答，希望對(duì)您有幫助。