Bom Dia pessoal, meu chefe me mandou uma planilha porém ao executar uma Macro ela da o erro em tempo e execução 1004. Meu excel é o 2000. Será que alguem podeia me ajudar?
Sheets("Espelho").Select
Rows("2:100").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Range("C2").Select
Sheets("Inserir dados").Select
Range("H2:K99").Select
Selection.Copy
Sheets("Espelho").Select
Range("B2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("B2").Select
Sheets("Inserir dados").Select
Range("J89").Select
Selection.End(xlUp).Select
Selection.End(xlToLeft).Select
Selection.End(xlToLeft).Select
Selection.End(xlToLeft).Select
Selection.End(xlToLeft).Select
Application.CutCopyMode = False
Range("B2:E100").Select
Selection.ClearContents
Range("B2").Select
MsgBox "Obrigado por inserir os dados, tenha um bom trabalho!"