Neste artigo, aprenderemos como fechar a pasta de trabalho do Excel usando o VBA no Microsoft Excel 2010.
Depois que sua macro / código VBA tiver executado todas as ações necessárias, você deseja que a macro salve o arquivo ou ignore-o. Portanto, aqui estão as opções que você pode definir no código ao solicitar que ele feche o arquivo. O método Close and Open no VBA pode ser usado para fechar e abrir pastas de trabalho.
Se você deseja que o código apenas feche o arquivo sem salvar as alterações - use esta linha no final do seu código ou onde for necessário -
ActiveWorkbook.Close (False) ou ActiveWorkbook.Close False ou ActiveWorkbook.CloseSaveChanges: = FALSE
Veja o código nesta imagem abaixo. Para copiar o código, pressione Alt + F11 no teclado enquanto se certifica de que a planilha do Excel está aberta. Em seguida, clique com o botão direito do mouse em Objetos do Microsoft Excel e selecione Inserir. Em seguida, clique em Módulo. Copie sobre o código fornecido abaixo da imagem -
Opção Explícita
Sub macro1 ()
ActiveWorkbook.Close False
End Sub
Nota: Você pode alterar o texto ActiveWorkbook para se referir ao nome da pasta de trabalho ou à variável que você usou para identificar a pasta de trabalho de acordo com seu código.
Se você quiser que o código salve as alterações ao fechar o arquivo, use
ActiveWorkbook.Close (True) ou ActiveWorkbook.Close True ou ActiveWorkbook.Close SaveChanges: = TRUE
Aqui está o código -
Opção Explícita
Sub macro1 ()
ActiveWorkbook.Close True
End Sub
No entanto, se você quiser que o usuário decida, basta inserir
ActiveWorkbook.Close
Aqui está o código -
Opção Explícita
Sub macro1 ()
ActiveWorkbook.Close
End Sub
O usuário receberá uma janela pop-up perguntando se deseja ou não salvar a pasta de trabalho.
Pastas de trabalho ("Arquivo1.XLS"). Fechar SaveChanges: = False
Este exemplo fechará File1.xls e descarta todas as alterações feitas nele.
Conclusão:
Se “Application.DisplayAlerts” tiver sido definido como False, você não receberá nenhum pop-up e a pasta de trabalho será fechada diretamente sem solicitar que seja salva.
Este pop-up aparecerá se “Application.DisplayAlerts” não estiver definido como False em nenhum lugar antes da linha de código Activeworkbook.Close do Excel vba.
Portanto, mesmo que o código exija que você desligue os alertas, certifique-se de que “Application.DisplayAlerts = True” esteja presente antes da linha Activeworkbook.Close.
Se você gostou de nossos blogs, compartilhe com seus amigos no Facebook. E você também pode nos seguir no Twitter e no Facebook.
Gostaríamos muito de ouvir de você, diga-nos como podemos melhorar, complementar ou inovar nosso trabalho e torná-lo melhor para você. Escreva-nos emsite de email