I found this in the VBA help menu.

Set ma = Range("a3").MergeArea
If Range("a3").MergeCells Then
ma.Cells(1, 1).Value = "42"
End If


Letting VBA search a range is always faster than indexing rows and columns.
I usually do this

Set Myrange = Range("A1:Z:50)
For each MyCell in Myrange

Next MyCell



"NOPIK" wrote:

I want to speed up my select procedure. Is there any VBA method or
Excel function to find specified format (MergedCells in my case) in
Cells range?