VBA Code to Close all Workbooks at Once in Excel

VBA code that you can use to close all open workbooks at once in Excel.

VBA Code:

Sub CloseAllWorkbooks()
    Dim wb As Workbook
    
    ' Loop through each open workbook
    For Each wb In Application.Workbooks
        ' Close the workbook without saving changes
        wb.Close SaveChanges:=False
    Next wb
    
    ' Inform the user that all workbooks have been closed
    MsgBox "All open workbooks have been closed!"
End Sub


Check All VBA Codes

Join Our Telegram Group

Join the TechGuruPlus Telegram group

Join Our WhatsApp Group

Join the TechGuruPlus WhatsApp group
Nazim Khan, founder of TechGuruPlus.com

— Founder & Editor, TechGuruPlus.com
[MBA in Finance]

Nazim Khan has spent over ten years working with Excel, Tally and office documentation in accounts, finance and MIS roles. He has been running TechGuruPlus.com since 2016, where he publishes free editable templates for office work, and the YouTube channel Business Excel. He has trained more than 50,000 people online. Every template on this site is built and checked by him before it is published.

Contact  Â·  Excel Course

Leave a Comment