運行時錯誤 1004 應用程式定義或物件定義錯誤

運行時錯誤 1004 應用程式定義或物件定義錯誤

我有我寫的這個宏:

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。

但當我嘗試單獨執行它時,它確實有效。那我哪裡可能錯了呢?

謝謝。

相關內容