Quote Originally Posted by SMC
A stupid mistake founded (at last).

[vba] For t = 0 To n - 1

st = artic & arr_color(0) 'instead of (t)
SumXCollection.Remove st
Next t [/vba] Can you believe it?

I've not tried to follow all the previous posts, but this one just appears to repeat the same action n times.