View Single Post
  #10   Report Post  
Posted to microsoft.public.excel.programming
Bob Phillips[_6_] Bob Phillips[_6_] is offline
external usenet poster
 
Posts: 11,272
Default Loop Through All Open Workbooks

If Application.CountIf(wb.Worksheets(1).Cells,"myValu e") 1 Then


--

HTH

RP
(remove nothere from the email address if mailing direct)


"scott" wrote in message
...
can you correct syntax error in line

If Application.CountIf(wb.Worksheets(1).Cells,"myValu e) 1 Then


thanks

"Bob Phillips" wrote in message
...

For Each wb In Application.Workbooks
If Application.CountIf(wb.Worksheets(1).Cells,"myValu e) 1 Then
MsgBox "Found in " & wb.Name
End If
Next wb

--

HTH

RP
(remove nothere from the email address if mailing direct)


"scott" wrote in message
...
I'm trying to find an example of looping through all open workbooks and
doing a simple search of all cells to determine if a certain value

exists
in
any of the workbooks.

Any help?