Looping through Open Workbooks

sll810

Board Regular
Joined
Jun 29, 2007
Messages
86
I want to loop through all of my open workbooks and check to see if a string is within the filename I saved each workbook under. Any ideas?

I tried
for each workbook in xlapp
if workbook.name= strng then
----------
next workbook???
 

Excel Facts

What did Pito Salas invent?
Pito Salas, working for Lotus, popularized what would become to be pivot tables. It was released as Lotus Improv in 1989.

HalfAce

MrExcel MVP
Joined
Apr 6, 2003
Messages
9,456
Hello sll810,
Here's a quick example of a way to do that.
Code:
Sub LoopOpenBooksDemo()
Dim InPt$, Book As Workbook
InPt = InputBox("What string are you searching for?")
For Each Book In Application.Workbooks
  If InStr(Book.Name, InPt) Then MsgBox "The book's name is " & Book.Name
Next
End Sub

(Now I'll check John's linked thread just to see it's already been answered.) :unsure:
 
Upvote 0

Forum statistics

Threads
1,191,174
Messages
5,985,106
Members
439,940
Latest member
Kyrad42

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top