Cómo hacer que las palabras Blink en Excel

texto intermitente puede atraer la mirada a un celular, en particular, o rango de celdas, y alertar al usuario de la información importante. Aunque se puede cambiar el texto de muchos colores y fuentes en Microsoft Excel, el programa no tiene una función incorporada que hace que un abrir y cerrar de texto. Con Visual Basic para Aplicaciones (VBA), sin embargo, se puede adaptar Excel para adaptarse a sus necesidades - y que incluye la creación de un módulo de programación que hará que un abrir y cerrar de texto.

Instrucciones

1 Abra el Editor de Visual Basic presionando "Alt" y "F11" juntos.

2 Haga clic en "Insertar" y luego en "Nuevo módulo".

3 Copia y pega el siguiente código en la ventana del módulo en blanco:

Como RunWhen pública Doble

Sub StartBlink ()

With ThisWorkbook.Worksheets("Sheet1").Range("A1").Font

Si .ColorIndex = 3 A continuación, 'Texto Rojo

.ColorIndex = 2 'texto blanco

Más

.ColorIndex = 3 'Red Text

Terminara si

Terminar con

RunWhen = ahora + TimeSerial (0,0,1)

Application.OnTime RunWhen, " '" & ThisWorkbook.Name & "'! StartBlink",, True

End Sub

Sub StopBlink ()

ThisWorkbook.Worksheets("Sheet1").Range("A1").Font.ColorIndex = _

xlColorIndexAutomatic

Application.OnTime RunWhen, " '" & ThisWorkbook.Name & "'! StartBlink",, False

End Sub

4 Cambie la tercera línea del código para el número de hoja y la celda número real desea hacer parpadear. La dirección de la celda puede ser un rango. Por ejemplo, para hacer que las células B1 a B10 abrir y cerrar, sustituyen a "A1" a "B1: B10."

5 Haga clic en "Este libro de trabajo" de la lista en la barra lateral izquierda.

6 Corte y pegue el siguiente código en la ventana del módulo en blanco:

Private Sub Workbook_Open ()

StartBlink

End Sub

Private Sub Workbook_BeforeClose (Cancel As Boolean)

StopBlink

End Sub

7 Pulse la tecla "F5" para ejecutar la rutina.

Consejos y advertencias

• Parpadear el texto puede ser muy molesto en un libro, y el usuario ocasional puede no saber cómo acceder a VBA para apagarlo.