erro em tempo de execução 1004 Erro definido pelo aplicativo ou definição de objeto

Question

Eu tenho esta macro que escrevi:

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

Originalmente, o código acima faz parte de um código maior. Mas quando eu o executo, ocorre o erro de execução 1004.

Mas quando tentei executá-lo sozinho, funcionou. Então, onde posso estar errado?

Obrigado.