実行時エラー 1004 アプリケーション定義またはオブジェクト定義エラー

Question

私が書いたマクロは次のとおりです:

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 が発生します。

しかし、それを単独で実行してみると、うまくいきます。では、どこが間違っているのでしょうか?

ありがとう。