文章介紹excel中用vba宏代碼來進(jìn)行合并單元格的操作過程，以及用VBA宏代碼語句判斷單元格是否為合并單元格。
以前的文章介紹excel合并單元格多是基礎(chǔ)操作，本文介紹關(guān)于excel合并單元格宏VBA代碼方面的應(yīng)用。
第一，用VBA宏判斷excel合并單元格
在excel中按下ALT+F11，打開VBE編輯器，復(fù)制下面代碼，按F5鍵運(yùn)行，如果A1單元格為合并單元格，則彈出消息框提示此單元格為合并單元格，如果A1單元格沒有合并，消息框提示此單元格不是合并單元格。
Sub excel合并單元格宏()
If Range("A1").MergeCells Then
MsgBox "此單元格為合并單元格"
Else
MsgBox "此單元格不是合并單元格"
End If
End Sub
第二，用宏VBA代碼來進(jìn)行合并單元格
用上面介紹的方法，復(fù)制下面這段代碼，運(yùn)行的結(jié)果是：當(dāng)我們在輸入框輸入一個行號，然后excel會自動合并A1到輸入行號的單元格區(qū)域。比如我們輸入8，excel則合并A1：A8單元格區(qū)域。
Sub合并單元格宏()
Dim x1 As Long
x1 = InputBox("請輸入行號：")
Sheets("sheet1").Range("a1:a" & x1).Merge
End Sub
又比如下面這段宏VBA代碼可以實(shí)現(xiàn)C6:F10單元格區(qū)域合并。
Sub 合并單元格()
Range("C6:F10 ").MergeCells = True
End Sub
