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 uporabe 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?
# 1 - Uporaba lastnosti barv
Predpostavimo, da imate v celici A1 besedo »Pozdravljeni«. Videli bomo, kako uporabiti barvo ozadja te celice.
Če želimo 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. Če želite spremeniti barvo 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 imenovanih 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 vrednost .
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, in tudi z uporabo funkcije RGB ustvarimo svojo barvo.
Lastnost COLOR INDEX je v VBA omejena. Vsebuje lahko 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 povedal Color Index, lahko lastnost 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.
