Closing Workbook when Userform closes

[Boechat]

Greetings everyone,

I'm currently trying to get my excel application to close whenever I close any userform using the red X in the right hand corner. Besides, I'd like the form to throw a prompt asking whether I want to save it or not.
How do I get this done without having to code it into every single form I have (about 40 in this program)?

Thanks in advance

 

[Norie]

If you want to get rid of that message I think you'll either need to save the workbook or disable display alerts.

By the way, why 40 userforms?

Are they connected in anyway?

Perhaps each one connected to a specific sheet?

 

[Boechat]

That's it, I do NOT want to get rid of it, I was wondering if it would throw the message naturally without me having to code anything haha
They are all connected, work as a little .exe giving reports and listing inventory, registers, contact lists and such for my firm.
Yepp, they draw information from different sheets and ranges

 

[mikerickson]

This might do what you want. The "do you want to save" message should appear automatically as part of the close method

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = vbFormControlMenu Then
        ThisWorkbook.Close
        Application.Quit
    End If
End Sub

 

[Boechat]

Works just as intended.

Thanks everyone.

THREAD SOLVED