Have many workbooks open and need a quick survey of unsaved files? Excel macros will get the count of unsaved workbooks for you!

Make sure your Excel has the Developer Tab enabled following this tutorial.

I explain how you can do this below step by step!

What does it do?

Gets the count of unsaved workbooks

Copy Source Code:


Sub GetCountOfUnsavedWorkbooks()

Dim workbook As Workbook
Dim counter As Integer

For Each workbook In Workbooks
'Count the unsaved workbooks
If workbook.Saved = False Then
counter = counter + 1
End If
Next workbook

MsgBox "You have " & counter & " unsaved workbook(s)"

End Sub

Final Result: 

Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline

Exercise Workbooks:

DOWNLOAD EXCEL WORKBOOK 1

DOWNLOAD EXCEL WORKBOOK 2


We have 2 workbooks open that have unsaved changes:

Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline

STEP 1: In any one of the workbooks, go to Developer > Code > Visual Basic

Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline

 

STEP 2: Paste in your code and Select Save. Close the window afterwards.

Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline

 

STEP 3: Let us test it out!

Go to Developer > Code > Macros

Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline

 

Make sure your macro is selected. Click Run.

Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline

 

With just one click, you now have the number of unsaved workbooks!

Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline

 

How to Get the Count of Unsaved Workbooks Using Macros In Excel

YouTube video

Get the Count of Unsaved Workbooks Using Macros In Excel | MyExcelOnline

101 Macros Book

HELPFUL RESOURCES:

JOIN OUR FREE EXCEL COURSES BELOW
Click here to access these FREE Excel courses!

 

If you like this Excel tip, please share itEmail this to someone

email

Pin on Pinterest

Pinterest

Share on Facebook

Facebook

Tweet about this on Twitter

Twitter

Share on LinkedIn

Linkedin