VBA错误：将值粘贴到新工作表时出现运行时错误'1004'

Question

我正在尝试使用VBA在工作表之间复制和粘贴一些值。我的代码没有发现任何天生的错误，但我不断收到上述错误。

Set fullCopyRange = ws.Range(Cells(2, 2), Cells(lastRowRow + 1, 8))
fullCopyRange.Copy_ Destination:=Sheets("Requirements").Range(Cells(pasteDestinationLastRowRow + 1, 2))

第一行执行正常，第二行则没有。我可以事先检查pasteDestinationLastRowRow，确实有一个非空值，但是仍然返回错误，我也不知道为什么。

Answer 1

按如下所示替换行：

Set fullCopyRange = Range(ws.Cells(2, 2), ws.Cells(lastRowRow + 1, 8))
fullCopyRange.Copy Destination:=Sheets("Requirements").Cells(pasteDestinationLastRowRow + 1, 2)

然后重试。

我们在第一行中限定Cells()，并在第二行中修复语法。