lythyo

Luis_P respondió: Bueno de la mima manera que las veces anteriores. Solo que cuando evalúas la condición utiliza una estructura selec case Select Case [a1] Case Is = 0 objeto1 = amarillo objeto2 = negro objeto3 = verde Case Is = 1 objeto1 = azul objeto2 = rojo objeto3...

Luis_P respondió: Bueno en ese caso 1 cosa antes: ¿Todos los objetos cambian al mismo color?

Luis_P respondió: Podrías utilizar el evento change de la hoja para evaluar el valor de la celda en cuestión En este caso seria: Para el rombo de nombre "1 Rombo" considerando la celda F1 como la celda a evaluar Private Sub Worksheet_Change(ByVal Target As Range)...