Microsoft Office Forums - View Single Post - How to remove the 'cancel' function when user clicks the 'X' button?

elaineAda · 02-16-2023, 11:46 PM

Is there a way to remove the Cancel button when the user clicks the "X" button in the upper-right corner of the Word window

I wrote the following but it didnt seem to work

Code:

Private Sub Document_BeforeClose(Cancel As Boolean)
    If ActiveDocument.Saved = False Then
        Select Case MsgBox("Do you want to save changes to this document?", vbYesNo + vbExclamation + vbDefaultButton1, "Microsoft Word")
            Case vbYes
                ActiveDocument.Save
            Case vbNo
                'Do nothing
        End Select
    End If
End Sub

Pl assist. Thanks.