Excel - Una macro para hacer que las celdas parpadeen.

Problema

Quiero hacer que una celda parpadee bajo Excel. ¿Puede ser macro o una forma más simple?

Solución

-1. Selecciona la celda

-2. Elija Estilo en el menú Formato.

-3. En el cuadro de diálogo Estilo, ingrese un nuevo nombre de estilo, como 'Parpadeo'.

-4. Usando los controles en el cuadro de diálogo, cambie los atributos de estilo.

-5. Haga clic en Aceptar.

Este estilo se puede aplicar a las celdas de su elección.

Ahora necesitas crear las macros:

 Dim NextTime As Date Sub StartFlash () NextTime = Now + TimeValue ("00:00:01") Con ActiveWorkbook.Styles ("Flashing"). Fuente If .ColorIndex = xlAutomatic Then .ColorIndex = 3 .ColorIndex = 5 - .ColorIndex Termine con Application.OnTime NextTime, "StartFlash" End Sub

-------------------------------------------------- ----------------------

 Sub StopFlash () Application.OnTime NextTime, "StartFlash", horario: = False ActiveWorkbook.Styles ("Flashing"). Font.ColorIndex = xlAutomatic End Sub