Desabilitar el botn cerrar y barra de titulos

[JoaoM]

Si tienes un boton en alguna hoja donde abres el formulario y, el formulario tiene un boton para cerrarlo, ESTA es la rutina.

Private Sub UserForm_QueryClose(Cerrar As Integer, ModoCerrar As Integer)
'Evita que el usuario cierre con el cuadro de diálogo Cerrar de la barra de título (crucecita: X) del formulario activo
If ModoCerrar = vbFormControlMenu Then
Cerrar = True
MsgBox " Este boton de cierre esta desactivado," & vbCrLf & vbCrLf & " use el boton adecuado 'Salir'", vbInformation, "BOTON ANULADO"
End If
End Sub

En la ventana de codigo del formulario, introduces esa rutina y listo

Te diré que con esto, no desactivas la barra y si la X de cierre