With Range Paste Won't Work

[timbo1957]

Hi,

The copy part of this code works fine but the paste doesn't could anyone advise please?

Many thanks.

    With Range("A2:A" & Lr)
        .Copy
    End With
        
    With Range("W2:W" & Lr)
        .Paste
    End With