Sub Test()With Worksheets("Sheet3")Set ma = Range("E5").MergeAreaIf ma. Address = "$E$5" Then MsgBox "not merged"Else ma.Cells(1, 3).Value = "52" End ...
tw.knowledge.yahoo.com