Ошибка времени выполнения 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.

Но когда я попробовал выполнить это в одиночку, это сработало. Так где же я мог ошибиться?

Спасибо.