Hi,
Sorry about mis posting, I am new at this. I still get an error on the following line:
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
My source sheet has 6 merged cells and my destination has 3 merged cells.
Here is the code for that...