VBA判斷Excel選擇區域是否有合並單元格

　　要想判斷合並單元格，得分為兩種情況：

　　①：當前選中的單元格為合並單元格;

　　②：選區內有合並單元格;

　　代碼一：

　　If Selection.MergeCells or IsNull(Selection.MergeCells) Then

　　MsgBox "選區內有合並單元格"

　　Else

　　MsgBox "選區內沒有合並單元格"

　　End If

　　代碼二：

　　Flag = False

　　For Each Rng In Selection

　　If Rng.MergeCells Then

　　Flag = True

　　Exit For

　　End If

　　Next

　　If Flag Then

　　MsgBox "選區內有合並單元格"

　　Else

　　MsgBox "選區內沒有合並單元格"

　　End If

　　經過測試驗證，代碼一比代碼二更具有效率。在使用的時候，將如上的代碼放到過程裡面即可直接使用。