如何查找范围是否包含VBA中的合并单元格

我有一个Excel文件,其中包含工作class次。 我想找出是否有任何合并单元格,如给定下面给定范围..

例

我怎样才能确定单元格填充给定的范围或细胞合并在给定的范围内?

If IsEmpty(Range("NewRange")) = False Then z = z + 1 'My counter End If 

我试过IsEmpty函数,但它不能正确工作在合并的单元格上。 你可以尝试,但结果是一样的..虽然我有一个空的单元格块在那里计算为填充..

MS Excel 2010和更高版本有Range.MergeCells属性(Excel) ,如果范围包含合并的单元格,则返回true

您可以在这里find另一种方法: http : //www.exceltrick.com/how_to/find-merged-cells-in-excel/

 Dim r As Range Set r = Range("A9:G10") With r If IsNull(.MergeCells) = True Or .MergeCells = True Then z = z + 1 End If End With