Hello Dave
thanks a lot for this advice. I will try it as soon as possible. I
don't know why I haven't seen this property "MergeCells" so far.
Regards
ajxecc
On Apr 15, 6:40 am, Dave Bonallack wrote:
> Hi ajxecc,
>
> Try this code:
>
> Sub mergedetect()
> Dim c As Range
> For Each c In Range(
Hi ajxecc,
Try this code:
Sub mergedetect()
Dim c As Range
For Each c In Range("A1:A10")
If c.MergeCells = True Then MsgBox c.Address & " is merged with another cell."
Next c
End Sub
Change the Range ref to suit your needs.
You can change the code after the "Then" keyword, to do anythin