Excel no dispone de parpadear o parpadear el texto como una opción de fuente. Uso de Excel integrado en Visual Basic para aplicaciones , sin embargo , puede utilizar código para hacer el cambio de color de texto todos los sectores , creando un efecto de parpadeo . Instrucciones
1

Abra el archivo de Microsoft Excel 2010 en el que desea que el flash de texto. Pulse la tecla " Alt" y " F11 " para abrir la consola de VBA.

2 Haga clic en la entrada " ThisWorkbook " en el lado izquierdo de la consola de VBA. Mueve el ratón sobre "Insertar" y elegir la opción " Módulo ".

3 Haga doble clic en la opción " ThisWorkbook " . Copie el siguiente código y pegarlo en el espacio en blanco en la parte derecha de la pantalla :

Private Sub Workbook_Open ()

Blink

End Sub
< p > Private Sub Workbook_BeforeClose ( Cancel As Boolean )

NoBlink

End Sub

este código se iniciará y el texto que parpadea cuando se abre el libro, y dejar el texto parpadea cuando cierra el libro , una vez que se inserta el código para decirle a Excel lo Blink y NoBlink significa realmente .
4

doble clic en " Módulo 1 " de la lista en el lado izquierdo de la pantalla. Coloca el cursor en el lado derecho de la pantalla e introduzca la siguiente línea: .

Timecount Pública As Double

Esto crea una variable llamada " Timecount " que se puede utilizar en todas las subrutinas < br > Página 5

Presione enter para mover el cursor a la siguiente línea y escriba el siguiente código: Sub

blink ()

ThisWorkbook.Worksheets ( "Sheet1 ") . Range (" A1: A10 ") . . . . Fuente

Si ColorIndex = 3 Entonces

ColorIndex = 2

demás

ColorIndex = 3

End If End

Con

Timecount = Ahora TimeSerial + ( 0 , 0, 1) spanish

Timecount Application.OnTime , "Blink " , Verdadero

End Sub

Esto crea un subprograma denominado "Blink " que hará que todo el texto dentro del rango definido a parpadear. Usted puede cambiar el rango de . "A1: A10 " a cualquier rango que desee, incluyendo una celda individual
6

Pulse " Enter" para acceder a la siguiente línea y escriba el siguiente código:

Sub noblink ()

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

xlColorIndexAutomatic

Aplicación . OnTime Timecount , "Blink " , False

End Sub

Esto creará un subprograma que se ejecutará cuando se cierra el libro. Resulta que todo el texto de nuevo a negro , de modo que alguien que abre el libro sin macros habilitadas no vea accidentalmente nada en los cuadros de texto .
7

Cierre la consola de VBA , haga clic en la "X" en la la esquina superior derecha . Haga clic en la ficha "Archivo " en la parte superior de la pantalla y elegir la opción " Guardar como ". Seleccione " Libro de Excel habilitado para macros " en el campo desplegable y escriba un nombre para el libro . Haga clic en " Guardar ".
8

Cierre el archivo de Excel y, a continuación , vuelva a abrirlo . Su texto , dentro del rango definido en la macro , comenzará a parpadear . Dependiendo de la configuración de seguridad , es posible que tenga que hacer clic en el botón " Enable Macros " en la parte superior de la pantalla para ver el texto parpadeante.