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?
|