Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Application.DisplayAlerts não funciona

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
FlavioRC
Acabou de chegar
Acabou de chegar
Mensagens: 3
Registrado em: Qui Mar 24, 2022 2:45 am

Application.DisplayAlerts não funciona

Mensagem por FlavioRC »

Pessoal, boa noite.

Estou fazendo o meu código e não quero que, quando fechar uma plailha, apareça o pop up de salvamento.
Tentei colocar o Application.DisplayAlerts=false mas ele não muda para o false, fica só no verdadeiro sempre.

Alguém sabe o que pode esta acontecendo?


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Application.DisplayAlerts não funciona

Mensagem por webmaster »

Onde está colocando o código?


FlavioRC
Acabou de chegar
Acabou de chegar
Mensagens: 3
Registrado em: Qui Mar 24, 2022 2:45 am

Re: Application.DisplayAlerts não funciona

Mensagem por FlavioRC »

Eu estou usando esse e outra linhas de codigo para agilar o processamento em alguns modulos. Por-em, msm depurando, F8, e passando pelas linhas abaixo, o parametro nunca vai para False, fica sempre em True.
Alguem sabe como corrigir?

Ex:
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Application.EnableEvents = False
Application.Calculation = xlCalculationManual


Avatar do usuário
webmaster
Administrador
Mensagens: 3114
Registrado em: Sex Jul 24, 2009 2:44 pm
Contato:

Re: Application.DisplayAlerts não funciona

Mensagem por webmaster »

Faz tem que não uso isso, mas fazia da seguinte forma:

Código: Selecionar todos

Application.DisplayAlerts = False
ActiveWorkbook.Saved = True 'isso não salva o arquivo, apenas diz ao Excel que a planilha não tem mudanças a serem salvas
Agora, isso sim é perigoso:

Código: Selecionar todos

Application.ScreenUpdating = False
Recomendo não usar.


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder