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

我目前判断方法是 Cells(i,j).MergeCells=True And Cells(i,j).Value<>""

这样判断是因为，合并单元格的值只存在左上角单元格
但是有个问题，如果有合并单元格的值本身就为空，那么我这个判断条件就不对了。

哪位大神有更好的判断方法？？求教！
找到方法了！ 原来 cells(i,j).MergeArea.Row 可以获取合并单元格行号！

Sub testMergeHeadRow() '判断是否为某合并单元格首行
For Each cc In Selection
If Cells(cc.Row, 2).MergeCells = True And cc.Row = Cells(cc.Row, 2).MergeArea.Row Then
Cells(cc.Row, 4).Value = "首行"
End If
Next
End Sub

相关了解……