Mucha gente usa las funciones de formato condicional de Excel para llamar la atención sobre valores o áreas específicas de sus hojas de trabajo. Por ejemplo, una celda puede estar formateada de modo que su contenido se muestre en rojo o en negrita si está por encima o por debajo de un cierto umbral.

Lo que falta, sin embargo, es una forma de hacer que el contenido de una celda parpadee o se encienda y apague. Para tal hazaña, se le deja a sus propios dispositivos y al milagro de las macros. Al utilizar estas herramientas, puede hacer que las celdas parpadeen diseñando primero un estilo especial para las celdas que parpadean y luego ejecutando una macro simple.

Para crear el estilo especial, siga estos pasos:

  1. Seleccione la celda que desea que se encienda y apague. (Asegúrese de que la celda contenga algo; no debe estar en blanco.)

  2. Asegúrese de que la pestaña Inicio se muestre en la cinta.

  3. En el grupo Estilos, haga clic en Estilos de celda. Excel muestra selecciones de estilos predefinidos.

  4. Elija Nuevo estilo de celda. Excel muestra el cuadro de diálogo Estilo. (Ver figura 1)

  5. En el cuadro Nombre de estilo, ingrese el nombre «Intermitente» (sin las comillas).

  6. Con los controles del cuadro de diálogo, modifique los atributos del estilo como desee.

  7. Haga clic en Aceptar.

Con el estilo ahora definido, debe aplicar ese estilo a las celdas que desee «flashear». Asegúrese de no aplicar el estilo a ninguna otra celda.

Ahora cree las macros (hay dos de ellas), como sigue:

Dim NextTime As Date

Sub StartFlash()

NextTime = Now + TimeValue("00:00:01")

With ActiveWorkbook.Styles("Flashing").Font         If .ColorIndex <> 2 And .ColorIndex <> 3 Then             .ColorIndex = 3         End If         .ColorIndex = 5 - .ColorIndex     End With     Application.OnTime NextTime, "StartFlash"

End Sub
Sub StopFlash()

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

Para que los elementos comiencen a parpadear, simplemente ejecute StartFlash. Las celdas formateadas con el estilo Intermitente alternarán entre texto rojo y blanco aproximadamente una vez por segundo. Cuando desee apagar el parpadeo, simplemente ejecute la macro StopFlash.

La macro funciona modificando el estilo que definió anteriormente, anteriormente en este consejo. (Asegúrese absolutamente de nombrar el estilo «Flashing»,

como se indica en el paso 5.) Todo lo que hace es cambiar la propiedad ColorIndex para que cambie entre dos valores: 3 y 2. Ese cambio en el estilo da como resultado el efecto de parpadeo cuando el color del texto cambia de rojo (3) a blanco (2) y viceversa.

Hay otra cosa importante a tener en cuenta sobre esta macro: la variable NextTime se declara fuera del procedimiento real en el que se utiliza. Esto se hace para que NextTime mantenga su valor de una invocación de StartFlash a la siguiente. Es este valor el que se utiliza para especificar la próxima vez (un segundo en el futuro) que se debe volver a ejecutar StartFlash.

_Nota: _

Si desea saber cómo usar las macros descritas en esta página (o en cualquier otra página de los sitios ExcelTips), he preparado una página especial que incluye información útil.

link: / excelribbon-ExcelTipsMacros [Haga clic aquí para abrir esa página especial en una nueva pestaña del navegador].

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (7223) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:

enlace: / excel-Flashing_Cells [Células intermitentes].