vba 如何判断单元格是否属于某合并单元格的首行

代码应该可以简单一点

Sub testMergeHeadRow()
For Each cc In Selection
If cc.MergeCells = True And cc.Row = cc.MergeArea.Ro