Ako si vyrobiť Slová Blink v programe Excel

Blikajúci text môže kresliť oko do určitej bunky tabuľky alebo oblasti buniek , a upozorňuje užívateľa na dôležité informácie . Aj keď môžete zmeniť text na mnohých farieb a písma v programe Microsoft Excel , program nemá vstavanú funkciu , ktorá robí texte blikať . S Visual Basic for Applications ( VBA ) , však, si môžete prispôsobiť Excel , aby vyhovoval vašim potrebám - a to zahŕňa vytvorenie programovací modul , ktorý bude robiť texte blikať . Pokyny dovolená 1

Otvorte Editor jazyka Visual Basic stlačením tlačidla " Alt " a " F11 " spolu .
2

Kliknite na " Vložiť " a potom kliknite na " nový modul . "

3

skopírujte a vložte nasledujúci kód do prázdneho okna modulu :

Verejné RunWhen Ako Double

Sub StartBlink ( )

S ThisWorkbook.Worksheets ( " Hárok1 " ) . Range ( " A1 " ) . Font

. ColorIndex = 3 Then ' Red Text

. ColorIndex = 2 ' White Text

Else

. ColorIndex = 3 ' Red Text

End If

End With

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

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

End Sub

Sub StopBlink ( )

ThisWorkbook.Worksheets ( " Hárok1 " ) . Range ( " A1 " ) . Font.ColorIndex = _

xlColorIndexAutomatic

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

End Sub
4

Zmeňte tretí riadok kódu na skutočnom počte listov a počtu buniek , ktoré chcete blikať . Adresa bunka môže byť rozsah . Napríklad , aby sa bunky B1 až B10 žmurknutia , nahradiť " A1 " s " B1 : . B10 " .
5

Kliknite na " Tento zošit " zo zoznamu v ľavom paneli

6

Vystrihnúť a vložte nasledujúci kód do prázdneho okna modulu :

Private Sub Workbook_Open ( )

StartBlink

End Sub

súkromia sub Workbook_BeforeClose ( Cancel As Boolean )

StopBlink

End sub ​​
7

Stlačte " F5 " spustiť rutinu .

• Predchádzajúca strana: Ako ovládať farby hypertextových odkazov v programe Excel for Mac 
• Ďalšia strana: Ako zarobiť viac šetrí s novými názvami v programe Excel