Excel VBA Basic - Fechando a Planilha - Close a Workbook using VBA
Simplesmente fechar uma planilha pode resolver um problema e nos livrar de uma dor de cabeça. Que tal programar suas planilhas para serem fechadas 20 ou 30 minutos após estarem abertas sem qualquer edição nela?
Option Explicit
Sub macro1()ActiveWorkbook.Close FalseEnd Sub
Também poderá implementar o código abaixo quando for a partir de outro aplicação MS Office:
Dim xlApp As Object
Set xlApp = GetObject(, "excel.application")
xlApp.Quit
set XlApp = nothing ' Fecha a aplicação MS Excel.
Let Application.DisplayAlerts = FalseLet Activeworkbook.close ([VBYes])Let Application.DisplayAlerts = True
' Fecha o Workbook e salva as mudanças efetuadas.
Deixe seus comentários, compartilhe este artigo!
⬛◼◾▪ Blogs ▪◾◼⬛
⬛◼◾▪ CONTATO ▪◾◼⬛