Indeks barv Excel VBA
Tako kot na delovnem listu spremenimo barvo celice ali danega obsega celic z zavihka doma v VBA. Imamo funkcijo vba, imenovano Color Index (Barvni indeks), ki se uporablja za spreminjanje barv celic ali ponujenega obsega celic. Ta funkcija ima edinstveno identifikacijo za različne vrste barv.
V VBA imamo dva načina nanašanja barve, prvi je z uporabo lastnosti "color", drugi pa z lastnostjo "ColorIndex".
Na celico nanesemo barvo kot barvo ozadja, uporabimo barvo pisave in barvo obrobe. Za dostop do lastnosti barv in barvnega indeksa moramo najprej izbrati celico.
Kako uporabiti lastnost Color & Color Index?
To predlogo barvnega indeksa VBA lahko prenesete tukaj - Predloga barvnega indeksa VBA# 1 - Uporaba lastnosti barv
Predpostavimo, da imate v celici A1 besedo »Pozdravljeni«. Videli bomo, kako uporabiti barvo ozadja te celice.
Če želite spremeniti barvo ozadja, moramo pri lastnostih barv najprej omeniti obseg celice.
Koda:
Podbarva () Obseg ("A1") Konec Pod 
Po izbiri celice moramo omeniti, kaj moramo storiti. Kot sem rekel, moramo spremeniti notranjo barvo celice. Za spremembo barve ozadja celice uporabite lastnost "Notranjost".
Koda:
Podbarva () Območje ("A1"). Notranjost Sub 
V razdelku Notranja lastnina imamo več drugih metod in lastnosti. Ker moramo spremeniti barvo celice, uporabimo barvno lastnost.
Koda:
Podbarva () Območje ("A1"). Notranjost Barva = Končni pod 
Tu lahko uporabimo 8 nenehno poimenovanih barv. Spodaj je seznam istih.
vbBlack, vbRed, vbGreen, vbBlue, vbRumena, vbMagenta, vbCyan, vbWhiteIzberite vrsto barve po svoji želji.
Koda:
Podbarva () Območje ("A1"). Notranjost Barva = vb Modri konec Pod 
Če to kodo zaženem s tipko F5 ali ročno, bo barva ozadja celice A1 spremenila v vbBlue.
Tako lahko uporabite druge konstantno imenovane barve. Poskusite z njimi preizkusiti rezultat.
Poleg teh 8 stalnih barv lahko napolnimo tudi z različnimi barvami z uporabo funkcije RGB v VBA.
Koda:
Podbarva () Območje ("A1"). Notranjost Barva = RGB (Končni pod 
Mešanico rdeče, zelene in modre moramo vnesti v številkah. Če želite to uporabiti, morate biti popolni pri vnosu številk. Zmes sem vnesla kot RGB (250, 200, 150).
Koda:
Podbarva () Območje ("A1"). Notranjost.Barva = RGB (250, 200, 150) Konec Sub 
Sprememba te barve je takšna.
Težava tukaj je v tem, da ne veste natančno, katero število ima kakšno barvo.
Spodnja koda je spremeniti barvo pisave.
Koda:
Sub Color_Font () Obseg ("A1"). Font.Color = RGB (100, 400, 100) Konec Sub 
Zaženite to kodo s tipko F5 ali ročno, da dobite rezultat.
# 2 - Uporaba lastnosti barvnega indeksa
Barvni indeks se nekoliko razlikuje od lastnosti barve. V lastnosti COLOR uporabljamo 8 konstantnih barv, ki jih daje VBA, prav tako z uporabo funkcije RGB ustvarimo lastno barvo.
Lastnost COLOR INDEX je v VBA omejena, lahko vsebuje vrednosti od 1 do 56. Vsako število od 1 do 56 ima različne barve. Spodaj so številke seznamov in njihove barve.
Spodaj je koda makra za spremembo barve ozadja celice A1 v rožnato.
Koda:
Sub ColorIndex_Cell () Obseg ("A1"). Interior.ColorIndex = 26 Konec Sub 
Zaženite to kodo ročno ali s tipko F5, da vidite rezultat.
Spodaj je koda makra za spremembo barve pisave celice A1 v rumeno.
Koda:
Sub ColorIndex_Font () Obseg ("A1"). Font.ColorIndex = 27 Konec Sub 
Zaženite to kodo s tipko F5 ali pa jo zaženite ročno in si oglejte rezultat.
Ena pomembnih stvari, ki si jo je treba zapomniti, je, da lahko vnesemo številke od 1 do 56. Če je kaj več kot 56, bomo dobili napako »Subscript Out Of Range«.
Ste opazili?
Kot sem že povedal, lastnost Color Index lahko vstavi le 56 barv, dejstvo pa je, da lahko vstavi le 46 edinstvenih barv in obstaja 10 podvojenih barv. Spodaj je seznam podvojenih barvnih kod.
