thanks very much... I have adapted it a little and it seems to work nicely

"Bernd Plumhoff" wrote:

Maybe this udf helps.

Regards,
Bernd

-------- snip here, press ALT + F11, insert module, put
code in ---------

Option Explicit

Public Function IsMerged(varRange As Variant, varCell As
Variant) As Boolean
'True if varCell belongs to merged cell range varRange,
'false if varRange not merged or varCell not part of
varRange

Dim ivarRange As Variant

IsMerged = False

For Each ivarRange In varRange

If ivarRange.MergeCells And ivarRange.Address =
varCell.Address Then

IsMerged = True
Exit Function

End If

Next ivarRange

End Function

--------- snip here ------------------

-----Original Message-----
I need to be able to tell if a cell at a given cell
reference is part of a
merged group of cells or not
.