vba excel erro de execução de macro 1004

0
Dim lastC As Long
lastC = wb2.Worksheets(2).Cells(1, Columns.Count).End(xlToLeft).Column 'highlighted in debug
SourceRange.Copy
wb2.Worksheets(2).Cells(1, lastC + 1).PasteSpecial Paste:=xlPasteValues,       Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False

Acima está o código que tenho, faz parte de uma macro maior. Quando eu executo, ele me dá erro de execução 1004 aplicativo definido ou erro definido pelo objeto.

Como parte do código maior, não funciona, mas quando tentei separá-lo e executá-lo, ele funciona bem.

Estou trabalhando com várias pastas de trabalho e planilhas. Eu tenho esse arquivo .xlsm que consolida 4 outros arquivos .xls em um.

Obrigado.

    
por amazing00 30.09.2014 / 08:21

0 respostas