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



我正在尝试使用VBA在工作表之间复制并粘贴一些值。我的代码没有任何天生的错误,但我一直遇到上述错误。

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

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

如下替换行:

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

然后重试。

我们在第一行中符合Cells()的资格,然后在第二行中修复语法。

相关内容

最新更新