Separates a merged area into individual cells.
Syntax
expression.UnMerge
expression A variable that represents a Range object.
Example
This example separates the merged range that contains cell A3.
With Range("a3")
If .MergeCells Then
.MergeArea.UnMerge
Else
MsgBox "not merged"
End If
End With