---

Hello,

What is the best way to exit the following loop?

For i = 0 To File1.ListCount - 1
' break the loop when File1.FileName = "The One I Need"
Select Case File1.FileName
Case "The One I Need"
MsgBox "Found!"
....
Case Else
dummy = ok
End Select
Next

What to do after displaying the Msgbox to break/end the loop?

Thanks,

Sjoerd

---

Hi Sjoerd

Exit For

HTH. Best wishes Harald

"ark312" <ark312@home.nl> skrev i melding
news:d7h5mm$ep7$1@news1.zwoll1.ov.home.nl...
> Hello,
>
> What is the best way to exit the following loop?
>
> For i = 0 To File1.ListCount - 1
> ' break the loop when File1.FileName = "The One I Need"
> Select Case File1.FileName
> Case "The One I Need"
> MsgBox "Found!"
> ....
> Case Else
> dummy = ok
> End Select
> Next
>
> What to do after displaying the Msgbox to break/end the loop?
>
> Thanks,
>
> Sjoerd
>
>