Excel中如何用vba统计cells(I,j)所在的合并单元格的合并个数?

Question

Cells(I,j)在一个合并的单元格区域内,如何统计这个区域合并了几个单元格?

Answer 1

MergeArea属性：返回一个 Range对象，该对象代表包含指定单元格的合并区域

通过MergeArea.rows.count获得合并区域的行数，MergeArea.columns.count获得合并区域的列数

   æ•…题目中要统计cells(i,j)所在的合并单元格的合并个数就可以用下面代码实现：

sub main

ro=cells(i,j).MergeArea.Rows.Count

co=cells(i,j).MergeArea.Columns.Count

su=ro*co

msgbox "指定单元格合并区域包含”& su &"个单元格”

end sub

Answer 2

用 cells(I,j).MergeArea.Rows.Count 占多少行
用 bb = cells(I,j).MergeArea.Columns.Count占多少列
两者相乘 就是占多少个单元格.本回答被提问者采纳