运行时错误1004在同一工作簿上复制数据

Question

我正在尝试将数据从一张纸复制到另一张。 但我得到了运行时错误1004 Application defined or object defined error。

Sub copycells()
    Sheets("B").Select
    Range("A2:M299").Copy
    Sheets("A").Select
    Range("E20:Q317").Select
    ActiveSheet.Paste
End Sub

还有其他方法可以做到这一点。谢谢提前

Answer 1

尝试：

Sub copycells()
    Sheets("A").Range("A2:M299").Copy
    Sheets("B").Range("E20:Q317").Activate
    ActiveSheet.Paste
End Sub

这是另一种甚至不使用“激活”的方法

Sub CopyCellsWithoutActivate()
    Sheets(1).Range("A2:M299").Copy
    Sheets(2).Range("E20:Q317").PasteSpecial (xlPasteAll)
End Sub