Blinkende tekst kan trække øjet til en bestemt regneark celle eller celleområde og alarmere brugeren til vigtige oplysninger . Selvom du kan ændre tekst til mange farver og skrifttyper i Microsoft Excel, indeholder programmet ikke har en indbygget funktion, der gør teksten blinker. Med Visual Basic for Applications ( VBA ) , men du kan skræddersy Excel til dine behov - og det omfatter at skabe en programmeringsmodul der vil gøre teksten blinker. Instruktioner
1
Åbn Visual Basic Editor ved at trykke på " Alt" og " F11 " sammen.
2
Klik på " Indsæt" og derefter klikke på "Ny Module ". < br >
3
Kopier og indsæt følgende kode i det tomme modulvinduet : Hej
Public RunWhen Som Double
Sub StartBlink ()
med ThisWorkbook.Worksheets ( " Ark1 "). Range (" A1 "). Font
p Hvis . ColorIndex = 3 Then ' Red Text
. ColorIndex = 2 ' White Text
< p> Else
. ColorIndex = 3 'Red Text
End If
End With
RunWhen = Now + TimeSerial ( 0,0,1 )
Application.OnTime RunWhen , " ' " & ThisWorkbook.Name & " '! StartBlink " , Sand nær
End Sub
Sub StopBlink ()
< p > ThisWorkbook.Worksheets ( " Ark1 "). Range (" A1" ) . Font.ColorIndex = _
xlColorIndexAutomatic
Application.OnTime RunWhen , " ' " & ThisWorkbook.Name & " ' ! StartBlink " , False nær
End Sub
4
Skift tredje linje af koden til det faktiske ark nummer og celle nummer , du ønsker at blinke. Celleadressen kan være en række . For eksempel , for at gøre cellerne B1 gennem B10 blink erstatte "A1 " med " B1: . B10 "
5
Klik på " Denne projektmappe " fra listen i venstre sidebar
< br . > 6.
klippe og indsætte følgende kode i det tomme modulvinduet : Hej
Private Sub Workbook_Open ()
StartBlink
End Sub
Privat sub Workbook_BeforeClose ( Cancel Som Boolean )
StopBlink
End sub
7
Tryk på " F5 " for at køre rutinen.