Ir ao conteúdo
  • Cadastre-se
Adriano Carmo

Erro de execuçã 1004

Recommended Posts

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!"

Compartilhar este post


Link para o post
Compartilhar em outros sites

Melhor disponibilizar o arquivo o codigo a principio nao tem nenhum erro aparente.

 

Provavelmente o erro ocorre quando você executa com determinada aba ativa e isso pode em alguns casos causar erro.

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×