Kuinka saada teksti vilkkumaan Excelissä

Excelissä ei ole vilkkuvaa tai vilkkuvaa tekstiä fonttivaihtoehtona. Käyttämällä Excelin sisäänrakennettua Visual Basic for Applications -ohjelmaa voit kuitenkin käyttää koodia saadaksesi tekstin vaihtamaan väriä jokaisessa osiossa luoden vilkkuvan tehosteen.

Vaihe 1

Avaa Microsoft Excel 2010 -tiedosto, jonka tekstin haluat vilkkua. Avaa VBA-konsoli painamalla "Alt" ja "F11".

Päivän video

Vaihe 2

Napsauta hiiren kakkospainikkeella "ThisWorkbook" -kohtaa VBA-konsolin vasemmalla puolella. Siirrä hiiren osoitin "Lisää" päälle ja valitse "Moduuli".

Vaihe 3

Kaksoisnapsauta "ThisWorkbook" -vaihtoehtoa. Kopioi seuraava koodi ja liitä se näytön oikeassa reunassa olevaan tyhjään tilaan:

Yksityinen alatyökirja_Open() Blink End Sub

Yksityinen alatyökirja_BeforeClose (Peruuta Boolean) NoBlink End Sub

Tämä koodi alkaa ja vilkkuu teksti, kun avaat tämän työkirjan, ja lopettaa vilkkuvan tekstin kun suljet työkirjan, kun lisäät koodin kertoaksesi Excelille, mitä Blink ja NoBlink todellisuudessa ovat tarkoittaa.

Vaihe 4

Kaksoisnapsauta "Moduuli 1" näytön vasemmassa reunassa olevasta luettelosta. Aseta kohdistin näytön oikealle puolelle ja kirjoita seuraava rivi:

Julkinen aikalasku kaksinkertaisena

Tämä luo muuttujan nimeltä "Timecount", jota voit käyttää jokaisessa aliohjelmassa.

Vaihe 5

Paina Enter siirtääksesi kohdistimen seuraavalle riville ja syötä seuraava koodi:

Sub blink() With This Workbook. Työarkit("Sheet1").Alue("A1:A10").Font If .ColorIndex = 3 Then .ColorIndex = 2 Else .ColorIndex = 3 End If End With Timecount = Nyt + TimeSerial (0, 0, 1) Sovellus. OnTime Timecount, "Blink", "True End Sub".

Tämä luo "Blink"-nimisen aliohjelman, joka saa kaiken määritetyn alueen tekstin vilkkumaan. Voit muuttaa alueen "A1:A10" mihin tahansa haluamaasi alueeseen, mukaan lukien yksittäinen solu.

Vaihe 6

Paina "Enter" päästäksesi seuraavalle riville ja syötä seuraava koodi:

Sub noblink() Tämä työkirja. Työarkit("Sheet1").Alue("A1:A10").Fontti. ColorIndex = _ xlColorIndexAutomaattinen sovellus. OnTime Timecount, "Vilkku", väärä loppu

Tämä luo aliohjelman, joka suoritetaan, kun suljet työkirjan. Se muuttaa kaiken tekstin takaisin mustaksi, jotta joku, joka avaa työkirjan ilman makroja, ei vahingossa näe mitään tekstikentissä.

Vaihe 7

Sulje VBA-konsoli napsauttamalla "X" oikeassa yläkulmassa. Napsauta "Tiedosto"-välilehteä näytön yläreunassa ja valitse "Tallenna nimellä". Valitse avattavasta kentästä "Excel-makrokäyttöinen työkirja" ja kirjoita työkirjan nimi. Napsauta "Tallenna".

Vaihe 8

Sulje Excel-tiedosto ja avaa se sitten uudelleen. Tekstisi, joka on makrossa määritetyllä alueella, alkaa vilkkua. Suojausasetuksistasi riippuen saatat joutua napsauttamaan "Ota makrot käyttöön" -painiketta näytön yläosassa nähdäksesi vilkkuvan tekstin.