Loop through all Open workbooks

  • Thread starter Thread starter Stuart
  • Start date Start date
S

Stuart

User has opened workbooks - I've no idea as to their names
nor how many.
With ActiveWorkbook will deal with one of them.
How do I get at the others, please?

Regards.
 
Hi

You could do something like

For i = 1 to workbooks.count
workbooks(i).activate
'do whatever you want to the active workbook here
next i

HTH

Ken
 
Sub allwbs()
For Each wb In Workbooks
MsgBox wb.Name

Next
End Sub
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Application.Caller calls from ActiveWorkbook not the actual cell workbook 1
Looping through sheets 3
Unwanted workbooks on startup 2
Help with Loop Please 8
Copy two sheets from workbook & create new workbook 8
COM addin won't connect when workbook opened via another workbookfrom another instance 3
Syntax to close Workbook 5
Adding a sheet to a workbook 1

Back
Top