Parcerias RicardoHorta.Net

Objeto.

• UserForm.

Descrição.

• Ocorre antes do formulário ( UserForm ) ser fechado.

Sintaxe.

• Sub UserForm_QueryClose(Cancel as Integer, CloseMode as Integer).

Argumentos.

• Cancel: Número Inteiro. Definindo este argumento com valor diferente de zero, você interrompe o evento QueryClose e impede o formulário de ser fechado.
• CloseMode: Número Inteiro. Identifica o que causou o evento QueryClose.
  • 0 ( zero ): O usuário clicou no botão Fechar da barra de título do formulário.
  • 1: A instrução Unload é executada pelo código do aplicativo.
  • 2: A sessão do ambiente operacional Windows atual está terminando. (Somente para o Visual Basic 5.0.).
  • 3: O Gerenciador de tarefas do Windows está fechando o aplicativo. (Somente para o Visual Basic 5.0.).

Como funciona o evento QueryClose.

• Em uma planilha vazia, abra o Editor VBA.

• Crie um formulário.

• Clique 2 vezes com o botão esquerdo ou...

• ... clique com o botão direito e escolha Exibir código.

• Na janela Procedimento,...

• ... selecione QueryClose e...

• ... digite este código.

• Execute o ...

• ... UserForm.

• Clique no botão Fechar e...

• ... a caixa de diálogo, criada pela função MsgBox, será exibida.
• Clique, por exemplo, no botão Não.

• O formulário não será fechado.

• Clique, novamente, neste X.

• Clique no botão Sim para interromper a execução.

• Bye, UserForm.

Parcerias RicardoHorta.Net

Parcerias RicardoHorta.Net

www.ricardo.horta.nom.br - Direitos adquiridos - Autor: Ricardo Horta