thanks Agraham, I like your solution
I implemented it on a group of 34 controls to change color and fontcolor - very efficient in saving code lines.
I had to use for -next loop with index, I did not succeed in
Control(boxes()).Color = 0,0,0 and got this error : "object does not contain a definition for ToLower "
is it my fault or the compiler's ?