copy paste last row with merged cells

[288enzo]

I feel like this is incredabily simple, I just can't see it.

I'm copying cell J9 which is merged with J10. Now, I've copied and pasted plenty, even using the last row, but this time I think the merged cells are throwing me off.

Every two cells are merged. J9 & J10, J11 & J12, J13 & J14 and so on.

I want to past to the last row of A all the way down J.

This is what I have

    Range("J9").Copy
    Range("J11:J" & Range("A" & Rows.Count).End(xlUp).Row).Paste

I've tried pastespecial, i've tried mergearea.copy.

This is the error I'm getting - Run-time error '438'; Object doesn't support this property or method.

Thank you

 

[GWteB]

The Range object doesn't have a member called Paste, that's why you're getting an error.
You could try ...

Range("J9").AutoFill Destination:=Range("J9:J" & Range("A" & Rows.Count).End(xlUp).Row), Type:=xlFillDefault