Fantastic! Too Cool!

Thanx,
--
Anil Gupte
"Stefi" wrote in message
...
Select the merged cell, then run this macro:

Sub UnMergeCopy()
Selection.MergeCells = False
On Error Resume Next
Selection.FillRight
Selection.FillDown
End Sub

Regards,
Stefi


"Anil Gupte" ezt írta:

I am looking for a simple macro that will umerge a cell and copy the
value
in the original merged cell into all the cells created as a result of the
merge. Any suggestions?

Thanx,
--
Anil Gupte