Como desabilitar o Fechar de um UserForm.
Às vezes em uma aplicação torna-se necessário impedir que o usuário feche o formulário pela ferramenta Fechar (X) na Barra de título do formulário.
Para desabilitar a função fechar do UserForm insira o código abaixo dentro do Módulo do Formulário.
Private Sub UserForm_QueryClose(Cance As
Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then Cancel = True
End Sub
Com o formulário selecionado clique no Menu Exibir e depois clique em Código. Observe a sequencia de imagens.
No Evento QueryClose insira o código como na imagem abaixo:
OBS: Como o Fechar 
da Barra de Título do formulário está desabilitado, é indispensável que no formulário tenha uma outra forma de fechá-lo, como por exemplo um Botão de Comando (com código para fechar o formulário - Unload Me), como mostrado na imagem abaixo:
Gostou? Se quiser mais eu tenho um e-Book sobre VBA que você pode se interessar.
Confira aqui
