Compartilhar via

erro em tempo de execução '1004' do Excel, erro de definição de aplicativo ou de objeto

tadeu PROJETOS 0 Pontos de reputação
2024-07-25T15:48:07.14+00:00

eu tenho uma planilha de excel. sempre usei esta planilha mas de um tempo pra ca surgiu um problema. eu tenho a seguinte macro. "Private Sub Workbook_Open() ActiveWorkbook.Sheets("BEMVINDO").Activate Range("CaminhoAtividades") = ThisWorkbook.Path Range("NomePasta") = ActiveWorkbook.Name End Sub" porém apareceu o seguinte erro: " erro em tempo de execução '1004' do Excel, erro de definição de aplicativo ou de objeto. Como posso corrigir este erro?

Microsoft 365 e Office | Instalar, resgatar, ativar | Para empresas | Windows
0 comentários Sem comentários
{count} votos

1 resposta

Classificar por: Mais útil
  1. Jonathan Pereira Castillo 17,170 Pontos de reputação Equipe Externa da Microsoft Moderador
    2024-07-25T16:16:26.9033333+00:00

    Oi!

    Bem-vindo ao Microsoft Q&A!

    O erro de tempo de execução ‘1004’ no Excel geralmente ocorre devido a problemas com a referência a objetos ou métodos que não existem ou não estão acessíveis no momento da execução. No seu caso, o problema pode estar relacionado às referências de intervalo ou à ativação da planilha. Aqui estão algumas sugestões para corrigir o erro:

    Verifique os nomes dos intervalos: Certifique-se de que os intervalos “CaminhoAtividades” e “NomePasta” existem na planilha “BEMVINDO”. Se esses intervalos não existirem, o código falhará.

    Ative a planilha antes de definir os intervalos: Às vezes, é necessário ativar a planilha antes de definir os intervalos. Tente modificar seu código para garantir que a planilha esteja ativa antes de definir os valores dos intervalos.

    Aqui está uma versão modificada do seu código:

    Private Sub Workbook_Open()

    With ActiveWorkbook

    .Sheets("BEMVINDO").Activate

    .Sheets("BEMVINDO").Range("CaminhoAtividades").Value = .Path

    .Sheets("BEMVINDO").Range("NomePasta").Value = .NameEnd With End Sub

    1. Verifique a existência da planilha “BEMVINDO”: Certifique-se de que a planilha “BEMVINDO” realmente existe no seu workbook. Se o nome estiver incorreto ou a planilha não existir, o código falhará.
    2. Depuração: Utilize a ferramenta de depuração do VBA para verificar linha por linha onde o erro ocorre. Isso pode ajudar a identificar exatamente qual parte do código está causando o problema.

    Espero que essas dicas ajudem a resolver o problema! Se precisar de mais assistência, estou à disposição.

    Saudações

    Jonathan.

    -----------

    Se a resposta for a solução correta, clique em "Aceitar resposta" e vote educadamente nela. Se você tiver perguntas adicionais sobre essa resposta, clique em "Comentar". Nota: Siga as etapas em nossa documentação para habilitar notificações por e-mail se você gostaria de receber notificações por e-mail relacionadas a este tópico.

    0 comentários Sem comentários

Sua resposta

As respostas podem ser marcadas como Respostas Aceitas pelo autor da pergunta, o que ajuda os usuários a saber a resposta que resolveu o problema do autor.