VBA – Forçar uma Pasta de Trabalho a Salvar Antes de Fechar
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!