Exiting a For Each Next loop

[AWEinCA]

I have:

For Each <file> in <directory>
'Find InStr(&quot;text&quot;,<file>)
Next

Once I find the &quot;text&quot; in the <file> name. I want to stop looping through the <file>s in the <directory>.

You know...like a while loop...except for folder and file objects.

Is there a way I can exit the loop or use some kind of a bolContinue variable to stop looping?

Thanks for any help you can give.

Aaron

 

[vasah20]

sure plug in exit for

ex:
for i 0 to somthing
if bolExit then
exit for
else
'do code
end if
next

 

[dwu1998]

use &quot;exit for&quot; like

For Each <file> in <directory>
'Find InStr(&quot;text&quot;,<file>)
if textFound then
exit for
end if
Next