Alana Yarid Postado Junho 13, 2017 Denunciar Share Postado Junho 13, 2017 ALGUÉM EM AJUDA, ESTÁ DANDO ERRO NA PLANILHA E NÃO CONSIGO ARRUMAR Sempre aparece: Erro em tempo de execução 1004. O método Paste da classe Worksheet falhou PESQUISAR Macro ' ' Range("C6").Select ActiveSheet.Paste ActiveCell.FormulaR1C1 = "=VLOOKUP(""*""&R[-2]C&""*"",Lista,2,)" Range("C8").Select ActiveSheet.Paste ActiveCell.FormulaR1C1 = "=VLOOKUP(""*""&R[-4]C&""*"",Lista,3,)" Range("C10").Select ActiveCell.FormulaR1C1 = "=VLOOKUP(""*""&R[-6]C&""*"",Lista,4,)" Range("C12").Select ActiveCell.FormulaR1C1 = "=VLOOKUP(""*""&R[-8]C&""*"",Lista,5,)" Range("A13:F13").Select End Sub Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Alana Yarid
ALGUÉM EM AJUDA, ESTÁ DANDO ERRO NA PLANILHA E NÃO CONSIGO ARRUMAR
Sempre aparece: Erro em tempo de execução 1004. O método Paste da classe Worksheet falhou
PESQUISAR Macro
'
'
Range("C6").Select
ActiveSheet.Paste
ActiveCell.FormulaR1C1 = "=VLOOKUP(""*""&R[-2]C&""*"",Lista,2,)"
Range("C8").Select
ActiveSheet.Paste
ActiveCell.FormulaR1C1 = "=VLOOKUP(""*""&R[-4]C&""*"",Lista,3,)"
Range("C10").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(""*""&R[-6]C&""*"",Lista,4,)"
Range("C12").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(""*""&R[-8]C&""*"",Lista,5,)"
Range("A13:F13").Select
End Sub
Link para o comentário
Compartilhar em outros sites
0 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.