Disable Excel Close button (X) on Menu

[venkia]

Hello,
In our Program we have a Disconnect button but most of the users are bypassing the Disconnect button and click on the Excel Close button. Could some one suggest me how to Disable the Excel Close button (X) on the Menu and Enable it when they click on the Disconnect.

Please suggest on how I should do this.. Thank you.

[dominicb]

Good afternoon venkia

Use some code such as this to stop users closing by clicking on the X (or even going to File > Close / Exit) :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = True
MsgBox "Cannot close this way"
End Sub

This needs to go in the ThisWorkbook object within the VBE.

To stop this from working use a piece of code like this :

Application.EnableEvents = False

HTH

DominicB