Auto Close and Save

[scottwilsonx]

Hi everyone. Hopefully this is an easy question to answer:

I want to set an automatic macro to close the file and exit excel.

I also want another one, which prompts the user to save the file an
then close.

Any ideas ?

Thanks
Scott

 

[papou]

Hi Scott
Sub CloseFileAndExit()
ThisWorkBook.Close(True) 'Or false if you do not wish to save (since you did
not mention)
Application.Quit
End Sub

Sub SaveAndClose()
Do While Application.Dialogs(xlDialogSaveAs).Show = False
Loop
ThisWorkbook.Close
Application.Quit
End Sub

HTH
Cordially
Pascal

 

[scottwilsonx]

Pascal, thanks for the code you kindly sent thru. Works perfectly!

Much obliged.

Scott

 

[papou]

Glad it helped

Cordially
Pascal