Find method loop with ColorIndex

[yellephant]

So, a few days ago I stopped by to see if there was a way to use the .Find method with cell shadings, or ColorIndex values, and got this little bit of code punched up (thanks to Noob):

Please Login or Register  to view this content.

So now I'm trying to figure out how to loop this for the scope of a worksheet automatically, but the trouble seems to be that, when the search reaches the last cell with that particular ColorIndex value, it loops back to the top again.

A previous .Find loop I had set up was this:

Please Login or Register  to view this content.

That second bit of code works well, but I don't know how to store a ColorIndex variable or something, whatever it's going to take to actually get this loop put together. All I'd like it to do is the same activity, to every cell shaded that particular color, and then, when it's hit them all, I want it to quit.

Any way this works out? I'm really unfamiliar with the ColorIndex property.

Thanks!

[rylo]

Hi

don't get hung up on the colorindex format issue. Use the same principle as the working loop. If your first find gets a cell, then put that cell address into a variable, then loop until the find loop comes back to that address.


rylo

[yellephant]

Alright, I got it.

Please Login or Register  to view this content.

Not the prettiest batch of code, that, but it gets the job done.

EDIT: With a big thanks to rylo for the gentle encouragement!

[rylo]

Hi

Glad you got it worked out. Heres something that I think is a little neater.

Please Login or Register  to view this content.

rylo