VBA code to close workbook
The workbook's Close method closes the Set workbook, for example ActiveWorkbook. This page discusses several ways to to this:
SaveChanges - to save or not to save changes
The SaveChanges argument specifies whether changes should be saved. If there are no changes to the workbook, this argument is ignored and the workbook just closes. If there are changes to the workbook and the workbook appears in other open windows, this argument is also ignored.
SaveChanges not specified - ask the user
If SaveChanges is not specified the user is asked if he wants to save the changes.
Save and close workbook
If SaveChanges is set to True, changes are saved to the workbook. If there is not yet a file name associated with the workbook, then FileName is used. If Filename is omitted, the user is asked to supply a file name.
Dim wb As Workbook: Set wb = wb.Close SaveChanges:=True
Close workbook without saving
Dim wb As Workbook: Set wb = wb.Close SaveChanges:=False
Close all workbooks
Closing all workbooks leaving it up to the system whether or not to ask is changes need be saved is simple.
Close all without saving using Code VBA is two steps:
- Insert For each loop over the workbooks
- Insert the appropriate close action
Dim wb As Workbook For Each wb In Application.Workbooks wb.Close SaveChanges:=False Next wb
Save changes under this file name. This only works if the following consitions are met:
- There must be changes in the workbook
- Extension / File Save As type must be same as of the workbook being saved. If not this will result in Error 1004
Dim wb As Workbook: Set wb = Dim strFilename As String: strFilename = wb.Close Filename:=strFilename
If the workbook doesn't need to be routed to the next recipient (if it has no routing slip or has already been routed), this argument is ignored. Otherwise, Microsoft Excel routes the workbook according to the value of this parameter. If set to True, the workbook is sent to the next recipient. If set to False, the workbook is not sent. If omitted, the user is asked whether the workbook should be sent.
Run some code before closing the Workbook
To run code before closing the Workbook put it under the
|Example uses for Workbook_BeforeClose|