我正在尝试使用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()
的资格,然后在第二行中修复语法。