I want to have a macro assigned to a button so that when the button is
pressed the current file is saved and then excel is exited.

I tried: -

Sub Closea()
ThisWorkbook.Save
Application.Select.Close
End Sub

But no good. Saving works but not close.

Sub Closea()
ThisWorkbook.Save
ThisWorkbook.Close
End Sub

Will close the workbook but not excel itself.
Any ideas?


---
Message posted from http://www.ExcelForum.com/

application.quit


Application.Select.Close


arno

ianripping < wrote:

I want to have a macro assigned to a button so that when the button is
pressed the current file is saved and then excel is exited.

I tried: -

Sub Closea()
ThisWorkbook.Save
Application.Select.Close
End Sub

But no good. Saving works but not close.

To close use Application.Quit

Regards,
--
Beto
Reply: Erase between the dot (inclusive) and the @.
Responder: Borra la frase obvia y el punto previo.

OK Brilliant this works fine, is it possible to make excel save change
to all open workbooks instead of: -

ThisWorkbook.Sav

--
Message posted from http://www.ExcelForum.com

Hi
try
For Each w In Workbooks
w.save
Next w

Frank

OK Brilliant this works fine, is it possible to make excel save
changes to all open workbooks instead of: -

ThisWorkbook.Save


---
Message posted from http://www.ExcelForum.com/

Thanks Frank. Works great. Not too sure how it does but it does

--
Message posted from http://www.ExcelForum.com

Thanks Frank. Works great. Not too sure how it does but it does

--
Message posted from http://www.ExcelForum.com