Semaforo
Publicado por Helmut (1 intervención) el 16/04/2017 00:45:13
Hola a todos
Estoy creando un semáforo con macros en excel, pudiesen ayudarme con lo siguiente, he seguido la siguiente formula encontrada en internet pero no me ha funcionado
Solo me aparece el color amarillo al seleccionar amarillo del combobox y no los otros colores.
Gracias.
Estoy creando un semáforo con macros en excel, pudiesen ayudarme con lo siguiente, he seguido la siguiente formula encontrada en internet pero no me ha funcionado
1
2
3
4
5
6
7
8
9
10
11
Private Sub ComboBox1_change()
ActiveSheet.Shapes.Range(Array("verde", "rojo", "amarillo")).Visible = False
Select Case ComboBox1.Value Case "rojo"ActiveSheet.Shapes("verde").Visible = True
Case "Verde"ActiveSheet.Shapes("rojo").Visible = True
Case Else
ActiveSheet.Shapes("amarillO").Visible = True
End Selec
End Sub
Solo me aparece el color amarillo al seleccionar amarillo del combobox y no los otros colores.
Gracias.
Valora esta pregunta
0
