Please do NOT use all caps in subject or body of posting

Option Explicit
Sub findmergedcells()
Dim c As Range
For Each c In Selection
If c.MergeCells Then
c.Select
MsgBox "here it is"
Exit For
End If
Next c
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Sudhakar A.R" wrote in message ...
when i sort the serial no excel shows Some merged cell is idintifed how
find that hiden mered cell?


Submitted via EggHeadCafe - Software Developer Portal of Choice
Sending SMTP email from within BizTalk Orchestration
http://www.eggheadcafe.com/tutorials...il-from-w.aspx