Excel快速合並內容相同的單元格

　　使用Excel統計數據時可能出現多行數據前幾列單元格內容相同需要合並的情況，可通過VBA快速進行內容相同單元格的合並。

　　按下 Alt+F11 打開VBA編輯界面，雙擊左側需要處理的表格，在右側代碼區輸入以下代碼。這里是處理A列，應當根據實際情況更改為其他列。

Sub mergeCell()
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

　　按 F5 運行宏或者點擊菜單欄的運行按鈕