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.
