Color intermitente en celda

Color intermitente en celda

Mediante una macro podemos poner una o varias celdas de excel con un color intermitente a modo de alerta.

Para ello solo es necesario ejecutar esta macro y nos pondrá de forma intermitente la celda A1:

Sub alerta()
If Range("a1").Interior.ColorIndex = 3 Then
Range("a1").Interior.ColorIndex = 4
Else
Range("a1").Interior.ColorIndex = 3
End If
Application.OnTime Now + TimeValue("00:00:01"), "alerta"
End Sub

Iván Sábado 23 Marzo 2013 - 10:44 pm | | · Microsoft Excel
Etiquetas utilizadas: , , , , , , , , , , , , , , , ,

dos comentarios

Felix Lopez
Felix Lopez, - 03-07-’15 19:33
GrupoNexcom
GrupoNexcom, (URL) - 08-07-’15 11:05
(optional field)
(optional field)

La moderación de comentarios está activa en este sitio web. Esto significa que sus comentarios no serán visibles en la página hasta que hayan sido aprobados por un editor.

¿Recordar información personal?
Letra pequeña: Todas las etiquetas html excepto <b> e <i> serán eliminadas de su comentario. Puede introducir enlaces simplemente escribiendo la url o direcciones de e-mail.