You will never reach Exit Do
This is because your always resetting .index to zero... or you will always have at least one Txt(i) array element with .index <= .Bounds, which in turn calls Exit For, which in turn keeps i from getting to -1VB Code:
For i = UB To 0 Step -1 With Txt(i) .index = .index + 1 If .index > .Bounds Then .index = 0 Else Exit For End If End With Next i If i = -1 Then 'we are done Exit Do End If
Tell us what you are trying to accomplish with that procedure... make the explanation descriptive... so we can rewrite the procedure (or relevant part) for you.




Reply With Quote