Guru do Excel e Power BI

Enviado: **12 Nov 2021 às 13:50**

Pessoal, gostaria de uma ajuda para a seguinte situação:
- em uma determinada planilha, quando alterada a célula A1 por exemplo, salvando ou não o arquivo antes de fechar, quando selecionar o comando para fechar a planilha, antes de fechar, aparecer uma caixa com a seguinte mensagem: "ATENÇÃO! Verificar a necessidade de atualizar planilha XPTO", e um botão de OK para fechar a planilha.

Enviado: **30 Nov 2021 às 14:05**

Boa tarde, @ppveiga !

A solução é bastante simples, você irá o recurso de eventos do Excel para isso siga os passos:

- Habilite a Guia Desenvolvedor
- Na guia desenvolvedor, clicka em Visual Basica (Abrira uma janela )
- Na pasta Microsoft Excel Objetos, vá em "Está pasta de trabalho"
- No cabeçalho em "Geral", Selecione "WorkBook"
- Na guia ao lado, Selecione "BeforeClose"
Na sub Workbook_BeforeClose(Cancel As Boolean), digite:
msgbox "ATENÇÃO! Verificar a necessidade de atualizar planilha XPTO"

Salve e fecha a janela e assim já estará funcionando, toda vez que a planilha for alterada, quando fecharem aparecerá o aviso.

Abraços,
-Davi

Muito bom! Funcionou direitinho!
Só mais uma dúvida, tem como fazer dessa forma conforme abaixo, deixar a palavra ATENÇÂO em cima e o restante da frase em baixo?

ATENÇÃO!
Verificar a necessidade de atualizar planilha XPTO.

Muito obrigado.

Olá, @ppveiga .

Veja se alguma das opções abaixo lhe atende.

Código: Selecionar todos

MsgBox "ATENÇÃO!" & vbLf & "Verificar a necessidade de atualizar planilha XPTO."

MsgBox "Verificar a necessidade de atualizar planilha XPTO.", , "ATENÇÃO!"

MsgBox "Verificar a necessidade de atualizar planilha XPTO.", 16, "ATENÇÃO!"

MsgBox "Verificar a necessidade de atualizar planilha XPTO.", 48, "ATENÇÃO!"

Muito bom!
Valeu!

Guru do Excel e Power BI

Msg Box ao sair da planilha

Msg Box ao sair da planilha

Re: Msg Box ao sair da planilha

Re: Msg Box ao sair da planilha

Re: Msg Box ao sair da planilha

Re: Msg Box ao sair da planilha