Fórum Excel Bácico, Avançado e Vba
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  Últimas imagensÚltimas imagens  ProcurarProcurar  RegistarRegistar  Entrar  

 

 Fechar Caixa de Diálogo pelo VBA

Ir para baixo 
AutorMensagem
Cezario




Mensagens : 2
Data de inscrição : 05/01/2016

Fechar Caixa de Diálogo pelo VBA Empty
MensagemAssunto: Fechar Caixa de Diálogo pelo VBA   Fechar Caixa de Diálogo pelo VBA EmptyTer Jan 05, 2016 3:32 pm

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!
Ir para o topo Ir para baixo
Cezario




Mensagens : 2
Data de inscrição : 05/01/2016

Fechar Caixa de Diálogo pelo VBA Empty
MensagemAssunto: Solução   Fechar Caixa de Diálogo pelo VBA EmptyQua Jan 06, 2016 12:36 am

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
Ir para o topo Ir para baixo
 
Fechar Caixa de Diálogo pelo VBA
Ir para o topo 
Página 1 de 1
 Tópicos semelhantes
-
» Caixa de dialogo
» Caixa de Combinação + Condicional
» Desabilitar o botão Fechar e Habilitar somente a opção minimizar no Formulário
» Enviar e-mail pelo o Excel quando faltar 30 dias para vencer um contrato.
» Fluxo de caixa

Permissões neste sub-fórumNão podes responder a tópicos
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: