Come creare uno sfarfallio di testo in Excel

Passaggio 1

Aprire il file di Microsoft Excel 2010 in cui si desidera battere il testo. Premi i tasti "Alt" e "F11" per aprire la console VBA.

Passaggio 2

Fare clic con il tasto destro sulla voce "ThisWorkbook" sul lato sinistro della console VBA. Muovi il mouse su "Inserisci" e scegli l'opzione "Modulo".

Passaggio 3

Fare doppio clic sull'opzione "ThisWorkbook". Copia il seguente codice e incollalo nello spazio vuoto sul lato destro dello schermo:

Private Sub Workbook_Open () Blink End Sub

Private Sub Workbook_BeforeClose (Cancel As Boolean) NoBlink End Sub

Questo codice inizierà accanto al testo lampeggiante quando aprirai questo libro e il lampeggio del testo si fermerà quando chiuderai il libro, una volta che avrai inserito il codice per dire a Excel cosa significa "lampeggiare" e "non lampeggiare".

Passaggio 4

Fare doppio clic su "Modulo 1", dall'elenco sul lato sinistro dello schermo. Posiziona il cursore sul lato destro dello schermo e scrivi la seguente riga:

Timecount pubblico come doppio

Questo crea una variabile chiamata "Timecount" che può essere utilizzata in ogni sottoprogramma.

Passaggio 5

Premi Invio per spostare il cursore sulla riga successiva e scrivi il seguente codice:

Subblink () con ThisWorkbook.Worksheets ("Foglio1"). Intervallo ("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

Questo crea una subroutine chiamata "Lampeggiante" che farà in modo che tutto il testo all'interno dell'intervallo definito lampeggi. È possibile modificare l'intervallo di "A1: A10" in qualsiasi intervallo desiderato, inclusa una singola cella.

Passaggio 6

Premere il tasto "Invio" per accedere alla seguente riga e scrivere il seguente codice:

Sub noblink () ThisWorkbook.Worksheets ("Foglio1"). Intervallo ("A1: A10"). Font.ColorIndex = _ xlColorIndexApplicazione automatica.OnTime Timecount, "Blink",, False End Sub

Ciò creerà una subroutine che verrà eseguita alla chiusura del libro. Converte tutto il testo in nero, in modo che una persona che apre per sbaglio il libro senza le macro abilitate non vedrà nulla nelle caselle di testo.

Passaggio 7

Chiudi la console VBA facendo clic sulla "X" nell'angolo in alto a destra. Fai clic sulla scheda "File" nella parte superiore dello schermo e seleziona "Salva come". Seleziona "Excel abilitato per macro libro" dal campo a discesa e inserisci un nome per il libro. Clicca su "Salva".

Passaggio 8

Chiudi il file Excel e riaprilo. Il testo, all'interno dell'intervallo definito nella macro, inizierà a lampeggiare. A seconda delle impostazioni di sicurezza, potrebbe essere necessario fare clic sul pulsante "Abilita macro" nella parte superiore dello schermo per visualizzare il testo lampeggiante.