How to disable close button userform?

In this Excel VBA tutorial lesson, I will show you how to disable the close button in an Excel userform. Let us first look at the close button we use in Excel userforms:

The button

The red button at the top end of the userform is the close button. Sometimes we want to disable this button so that the user can only close the userform using the exit button that is already created in the userform for the same purpose.

The code

Let's start with the code to disable the close button:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

If CloseMode = vbFormControlMenu Then 
    Cancel = True
    MsgBox "Please use the Exit button to close the form", vbOKOnly

End If

End Sub

We have to use this code along with the code of the existing userfrom:

When we use this code and try to press the close button, it will prompt a message like shown below:

This Message can be changed in the following code line:

MsgBox "Please use the Exit button to close the form", vbOKOnly

The purpose for creating this functionality is that sometimes we have other conditions before exiting the doc like:

The user must enter data before closing.

On clicking the Exit button:

For this function, we want to disable the close button.