MergeArea 属性返回 Range 对象,代表包含指定单元格的合并的范围。如果指定的单元格不在合并的范围内,则该属性返回指定的单元格。只读。Variant类型。 MergeCells 属性如果区域或样式包含合并单元格,本属性为 True。Variant 类型,可读写。 MergeCells 属性示例本示例为包含单元格“A3”的合并区域赋值。Set ma = Range("a3").MergeArea If Range("a3").MergeCells Then ma.Cells(1, 1).Value = "42" End If-----Range("D11").MergeCells = False
MergeCells 属性如果区域或样式包含合并单元格,本属性为 True。Variant 类型,可读写。
MergeCells 属性示例本示例为包含单元格“A3”的合并区域赋值。Set ma = Range("a3").MergeArea
If Range("a3").MergeCells Then
ma.Cells(1, 1).Value = "42"
End If-----Range("D11").MergeCells = False
Worksheets("Sheet3").Cells(10, 1).UnMerge
应该行的,不行在说吧,
然后 range.MergeCells = False 就可以啦,呵呵