Bom dia!

Gostaria de desabilitar o botão fechar e coloquei o código abaixo, troquei somente o nome para partilha, que é o meu formulário, mais não funcionou.
e fechar o formulario pelo botao x, pode ocasionar algum dano?

Segue abaixo código que retiei do fórum:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) 
     
    If CloseMode = 0 Then 
        Cancel = True 
        MsgBox "O "X" está desabilitado, use o botão Fechar do Formulario".", vbCritical 
    End If 
     
End Sub
http://www.vbaexpress.com/kb/getarticle.php?kb_id=164

Sub ShowForm() 
     
    UserForm1.Show 
     
End Sub 

Option Explicit 

Private Sub CommandButton1_Click() 
     
    Unload Me 
     
End Sub 

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) 
     
    If CloseMode = 0 Then 
        Cancel = True 
        MsgBox "O "X" está desabilitado, use o botão Fechar do Formulario".", vbCritical 
    End If 
     
End Sub

Paz e Bem.