Impedir o formulário que desenvolvemos seja fechado no momento errado ou sem querer, pode ajudar muito aos usuários menos atentos. O código abaixo mostrará como fazer isso, evitando que o formulário seja fechado ao se pressionar o 'X'.
Inicie por colocar o código abaixo no formulário: Clique duas vezes no formulário e cole o código:
Sub UserForm_Close (Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu ThenMsgBox "Pressione o botão Fechar."Let Cancel = TrueEnd If
End Sub
Para fechar o formulário inseriremos um código num botão do formulário:
Private Sub CommandButton1_Click()
Unload frm_Cad_Client
End Sub