![运行时错误 1004 应用程序定义或对象定义错误](https://linux22.com/image/1419581/%E8%BF%90%E8%A1%8C%E6%97%B6%E9%94%99%E8%AF%AF%201004%20%E5%BA%94%E7%94%A8%E7%A8%8B%E5%BA%8F%E5%AE%9A%E4%B9%89%E6%88%96%E5%AF%B9%E8%B1%A1%E5%AE%9A%E4%B9%89%E9%94%99%E8%AF%AF.png)
我有这个我写的宏:
Dim lastColumn As Long
lastColumns = wkbWorkbook2.Worksheets(2).Cells(1, Columns.Count).End(xlToLeft).Column 'this is the highlighted part in debug
SourceRange.Copy
wkbWorkbook2.Worksheets(2).Cells(1, lastColumns + 1).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
本来上面的代码是一个更大的代码的一部分。但是当我执行它时,它给出了运行时错误 1004。
但当我尝试单独执行它时,它确实有效。那么我错在哪里呢?
谢谢。