E qual e' il problema ?

Nome(i).Backcolor = vbRed