Copy Paste between sheets

Hi,

I want to copy a range from Sheet2 to Sheet1.

This works fine with code below:

'

 Keyboard Shortcut: Ctrl+j
'
    Sheets("Sheet2").Select
    Range("A7:D37").Select
    Selection.Copy
    Sheets("Sheet1").Select
    Application.Run "BLPLinkReset"
    Range("A12").Select
    ActiveSheet.Paste
End Sub

Problem happens when I put this code into a Command Button and I get following message:

Run-time error
Select method of Range class failed

Any idea why?
How can I do copy paste function using Command Button?

Thanks,
Nix

Hi nicolaforni

Please take a few minutes to read our Forum Rules, then edit your post to include code tags. Once complete, we will help you resolve your issue.

Thanks

Thanks for doing that.

Does this work for you?

Keyboard Shortcut: Ctrl j
'

    Sheets("Sheet2").Range("A7:D37").Copy Destination:=Sheets("Sheet1").Range("A12")
    Application.Run "BLPLinkReset"

End Sub

I'm not sure what BLPLinkReset does, so it may need to be reworked a bit, but test it first and let me know.