VBA – Forçar uma Pasta de Trabalho a Salvar Antes de Fechar

Written by

Mel Jenkins

Reviewed by

Steve Rynearson

Translated by

Daniel Caramello

Last updated on August 29, 2023

Forçar a Pasta de Trabalho a Salvar – Workbook_BeforeClose

Eu não aconselharia usar isso, mas para fins de experimentação e como demonstração do ActiveWorkbook.Save:

É possível salvar uma pasta de trabalho sem dar ao usuário a opção “Sim/Não” com o seguinte código:

Coloque isso no módulo EstaPastaDeTrabalho…



Private Sub Workbook_BeforeClose(Cancel As Boolean)



If Saved = False Then

 ActiveWorkbook.Save

End If



End Sub

Isso não funciona com múltiplas pastas de trabalho. Para fazê-lo funcionar com várias pastas de trabalho, você precisaria colocar o código no arquivo personal.xls ou fazer com que ele percorra todas as pastas de trabalho abertas.

Codificação VBA facilitada

Pare de procurar códigos VBA on-line. Saiba mais sobre o AutoMacro – um construtor de código VBA que permite que os iniciantes codifiquem procedimentos do zero com o mínimo de conhecimento de codificação e com muitos recursos que economizam tempo para todos os usuários!

alt text

Saiba mais!

<<Retornar aos exemplos de VBA

vba-free-addin

Exemplos de Add-ins de Códigos VBA

Acesse facilmente todos os exemplos de código que se encontram em nosso site.

Simply navigate to the menu, click, and the code will be inserted directly into your module. .xlam add-in.

(Nenhuma instalação necessária!)

Baixe de Graça

Retornar aos Exemplos de Códigos VBA