texto intermitente pode chamar a atenção para uma célula da planilha particular, ou intervalo de células , e alertar o usuário sobre informações importantes. Embora você possa alterar o texto a muitas cores e fontes no Microsoft Excel , o programa não tem uma função interna que faz piscar texto. Com o Visual Basic for Applications ( VBA ) , no entanto , você pode adaptar o Excel para atender às suas necessidades - e que inclui a criação de um módulo de programação que fará piscar texto. Instruções
1

Abra o Editor do Visual Basic pressionando "Alt" e " F11 " juntos.
2

Clique em "Inserir " e clique em "Módulo de Novo".

3

Copie e cole o seguinte código na janela do módulo em branco :

Pública RunWhen as Double

Sub StartBlink ()

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

Se . ColorIndex = 3 Then ' Red Texto

. ColorIndex = 2' texto branco

Else

. ColorIndex = 3 'Red Texto

End If End With

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

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

End Sub

Sub StopBlink ()

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

xlColorIndexAutomatic

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

End Sub
4

Altere a terceira linha do código para o número da folha atual e número de células que você quer piscar. O endereço da célula pode ser um intervalo . Por exemplo, para fazer as células B1 a B10 piscar , substitua "A1 ", com " B1: . B10 " .
5

Clique em " Esta pasta de trabalho " da lista na barra lateral esquerda
< br > 6

Corte e cole o seguinte código na janela de módulo em branco :

Private Sub Workbook_Open ()

StartBlink

End Sub

privada Sub Workbook_BeforeClose (Cancel As Boolean)

StopBlink

End Sub
7

Pressione " F5 " para executar a rotina.