Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Não aparecer a msg ...
 
Notifications
Clear all

Não aparecer a msg "Salvar alterações"

 
2024 - VBA & Macros
6 Posts
3 Usuários
0 Reactions
1,561 Visualizações
RSS
 JoilsonDO
(@joilsondo)
Posts: 47
Eminent Member
Topic starter
 

Boa tarde,

Fiz uma aplicação em VBA.

Ela grava uns dados na planilha (lembrando que aparece só o userform, as plans ficam escondidas).....
Depois que gravo eu criei um botão Sair e neste botão coloquei o código:

Private Sub CommandButton2_Click()
Unload Me
ActiveWorkbook.Close SaveChanges
Application.Quit
End Sub

Só que eu não queria que aparecesse a mensagem “Deseja salvar as alterações?” toda vez que fosse sair.

Eu gostaria que fossem salvas automaticamente e depois o código fechasse o excel sem ficar perguntando toda vez.

Como posso fazer isso?

Obrigado.

 
Postado : 14/02/2014 10:03 am
 gtsalikis
(@gtsalikis)
Posts: 2373
Noble Member
 

Tenta incluir essa linha:

Application.DisplayAlerts = False

Lembre-se de AGRADECER aos que te ajudaram, e de marcar o tópico como [Resolvido]
Gente que cuida de gente.

Gilmar

 
Postado : 14/02/2014 10:17 am
 JoilsonDO
(@joilsondo)
Posts: 47
Eminent Member
Topic starter
 

MAs coloca antes de qual linha do código?

Porque se eu colocar no começo ele não salva as alterações!!!

 
Postado : 14/02/2014 10:25 am
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Boa tarde!

Insira este código EstaPasta_de_trabalho:

Sub Encerrar()
        ActiveWorkbook.Save
       'ActiveWorkbook.close     'essa linha de código fecha somente o wkb ativo
        Application.Quit              'fecha o aplicativo todos os livros abertos.
End Sub

Att,

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 14/02/2014 11:10 am
 JoilsonDO
(@joilsondo)
Posts: 47
Eminent Member
Topic starter
 

Agora deu certo.

Obrigado.

 
Postado : 14/02/2014 12:06 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Caso seja necessário reabrir o tópico, o autor poderá enviar uma MP para um dos moderadores solicitando o desbloqueio.

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 14/02/2014 3:33 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico