Excel har inte blinkande eller blinkande text som ett teckensnittsalternativ. Genom att använda Excels inbyggda Visual Basic for Applications kan du dock använda kod för att få text att ändra färg varje avsnitt, vilket skapar en blinkande effekt.
Steg 1
Öppna Microsoft Excel 2010-filen där du vill få texten att blinka. Tryck på "Alt" och "F11" för att öppna VBA-konsolen.
Dagens video
Steg 2
Högerklicka på "ThisWorkbook"-posten på vänster sida av VBA-konsolen. Flytta musen över "Infoga" och välj "Modul".
Steg 3
Dubbelklicka på alternativet "This Workbook". Kopiera följande kod och klistra in den i det vita utrymmet till höger på skärmen:
Private Sub Workbook_Open() Blink End Sub
Private Sub Workbook_BeforeClose (Avbryt som Boolean) NoBlink End Sub
Den här koden startar och den blinkande texten när du öppnar den här arbetsboken och stoppar den blinkande texten när du stänger arbetsboken, när du infogar koden för att berätta för Excel vad Blink och NoBlink faktiskt betyda.
Steg 4
Dubbelklicka på "Modul 1" från listan till vänster på skärmen. Placera markören på höger sida av skärmen och skriv in följande rad:
Offentlig tid räknas som dubbelt
Detta skapar en variabel som heter "Timecount" som du kan använda i varje subrutin.
Steg 5
Tryck på enter för att flytta markören till nästa rad och ange följande kod:
Sub blink() Med ThisWorkbook. Worksheets("Sheet1").Range("A1:A10").Font If .ColorIndex = 3 Then .ColorIndex = 2 Else .ColorIndex = 3 End If End With Timecount = Now + TimeSerial (0, 0, 1) Application. OnTime Timecount, "Blink",, True End Sub
Detta skapar en subrutin som kallas "Blink" som gör att all text inom det definierade intervallet blinkar. Du kan ändra intervallet från "A1:A10" till vilket intervall du vill, inklusive en enskild cell.
Steg 6
Tryck på "Enter" för att komma till nästa rad och ange följande kod:
Sub noblink() ThisWorkbook. Worksheets("Sheet1").Range("A1:A10").Font. ColorIndex = _ xlColorIndexAutomatisk applikation. OnTime Timecount, "Blink", False End Sub
Detta kommer att skapa en subrutin som körs när du stänger arbetsboken. Det gör all text tillbaka till svart, så att någon som öppnar arbetsboken utan makron aktiverade inte av misstag ser ingenting i textrutorna.
Steg 7
Stäng VBA-konsolen genom att klicka på "X" i det övre högra hörnet. Klicka på "Arkiv"-fliken längst upp på skärmen och välj "Spara som". Välj "Excel Macro-enabled Workbook" från rullgardinsmenyn och skriv in ett namn för arbetsboken. Klicka på "Spara".
Steg 8
Stäng Excel-filen och öppna den sedan igen. Din text, inom det intervall som definieras i makrot, börjar blinka. Beroende på dina säkerhetsinställningar kan du behöva klicka på knappen "Aktivera makron" längst upp på skärmen för att se den blinkande texten.
