Ir para conteúdo
Fórum Script Brasil
  • 0

Fechar Caixa de Diálogo pelo VBA


Cezario

Pergunta

Pessoal, estou desenvolvendo um código que copia fórmulas de uma planilha (CONSOLIDADO) para outra (VÍNCULOS), dentro de uma mesma pasta de trabalho. Essas fórmulas, na verdade, são vínculos à células de uma outra pasta de trabalho.

Consegui criar tudo. Porém, durante a execução do código, a cada colagem de vínculo, abre-se a caixa de diálogo para que seja escolhida a pasta de trabalho a que se refere aquele vínculo.

Preciso que essa caixa de diálogo seja fechada automaticamente a cada vez que ela é aberta ou, ainda melhor, que ela nunca seja aberta. É possível? Segue o código:

Sub CopiarVínculos()

For Coluna = 5 To 150
For Linha = 6 To 500

Sheets("VÍNCULOS").Cells(Linha, Coluna).Value = Sheets("CONSOLIDADO").Cells(Linha, Coluna).Formula

Next
Next

End Sub

Desculpem se for uma pergunta simples, mas estou trabalhando com VBA há apenas 2 semanas.

Obrigado, abraços!

Link para o comentário
Compartilhar em outros sites

1 resposta a esta questão

Posts Recomendados

  • 0

Amigos, já consegui a resposta em outro fórum. Vou postar abaixo a solução apontada pelo colega André Santo. Funcionou perfeitamente:


Experimente inserir o trecho de código abaixo no início da sua função para evitar que sejam abertas quaisquer caixas de diálogo.

Application.DisplayAlerts = False

Ao final do código, você deve voltar com os alertas

Application.DisplayAlerts = True
Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,7k
×
×
  • Criar Novo...