Auto Close and Save

S

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
 
P

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
 
S

scottwilsonx

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

Much obliged.

Scott
 
Top