Cum se face o pâlpâire a textului în Excel

Pasul 1

Deschideți fișierul Microsoft Excel 2010 în care doriți să clipiți textul. Apăsați tastele "Alt" și "F11" pentru a deschide consola VBA.

Pasul 2

Faceți clic dreapta pe intrarea "ThisWorkbook" din partea stângă a consolei VBA. Deplasați mouse-ul peste "Insert" și alegeți opțiunea "Module".

Pasul 3

Faceți dublu clic pe opțiunea "ThisWorkbook". Copiați următorul cod și lipiți-l în spațiul gol din partea dreaptă a ecranului:

Private Sub Workbook_Open () Blink End Sub

Private Sub Workbook_BeforeClose (Anulare ca boolean) NoBlink End Sub

Acest cod va începe în dreptul textului care clipește atunci când deschideți această carte, iar clipeala textului se va opri când închideți cartea, odată ce ați introdus codul pentru a spune Excel ce înseamnă "clipește" și "nu clipește".

Pasul 4

Faceți dublu clic pe "Modul 1", din lista din partea stângă a ecranului. Plasați cursorul în partea dreaptă a ecranului și scrieți următoarea linie:

Timpul public ca dublu

Aceasta creează o variabilă numită "Timecount" care poate fi utilizată în fiecare subprogram.

Pasul 5

Apăsați Enter pentru a muta cursorul pe linia următoare și scrieți următorul cod:

Sub-intermitent () Cu ThisWorkbook.Worksheets ("Sheet1") Gama ("A1: A10")., 0, 1) Aplicație. Timpul temporar, "Blink",, True End Sub

Aceasta creează o subrutină numită "Intermitent" care va face ca tot textul din intervalul definit să clipească. Puteți schimba domeniul "A1: A10" la orice interval pe care îl doriți, inclusiv o celulă individuală.

Pasul 6

Apăsați tasta "Enter" pentru a accesa următoarea linie și scrieți următorul cod:

Sub-noblink () Acest Workbook.Worksheets ("Sheet1"). Interval ("A1: A10") Font.ColorIndex = _xlColorIndexAutomatic Application.OnTime Timecount, "Blink"

Aceasta va crea o subrutină care va fi executată când închideți cartea. Acesta va converti întregul text înapoi la negru, astfel încât o persoană care deschide accidental cartea fără macros activat nu va vedea nimic în casetele de text.

Pasul 7

Închideți consola VBA dând clic pe "X" în colțul din dreapta sus. Faceți clic pe fila "Fișier" din partea de sus a ecranului și selectați "Salvare ca." Selectați "Excel activat pentru macrocomenzi de carte" din câmpul derulant și introduceți un nume pentru carte. Dați clic pe "Salvați".

Pasul 8

Închideți fișierul Excel și redeschideți-l. Textul dvs., în intervalul definit în macro, va începe să clipească. În funcție de setările dvs. de securitate, va trebui să faceți clic pe butonul "Enable Macros" din partea superioară a ecranului pentru a vedea textul intermitent.