Copy merged cell, paste as merged cell

I have a macro to copy a merged cell from one sheet and paste it to another as a merged cell. Basically, I want to copy it AS IT IS and paste it AS IT IS. My code is below.

'Copy and paste the Procedure
    Sheets("Steps").Range("J2").Copy
    Sheets("Results").Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

I can manually do a copy and paste and it works fine, the pasted object stays as a merged cell. How can I do it in this macro?

Thanks in advance.