vba判断excel选择区域是否有合并单元格

代码及注释如下：
Sub main()
If Selection.MergeCells = True Then'利用Mergecells判断是否含有合并单元格
MsgBox "有合并单元格！"
Else
MsgBox "没有合并单元格！"
End If
End Sub
关于此例中用到的Merg