VBA indeks boja - Najbolji načini korištenja svojstva indeksa boja u programu Excel VBA

Excel VBA indeks boja

Kao na radnom listu, na početnoj kartici u VBA mijenjamo boju ćelije ili određenog raspona stanica. Imamo funkciju vba koja se naziva Indeks boja koja se koristi za promjenu boja stanica ili raspona stanica, a ove funkcije imaju jedinstvenu identifikaciju za različite vrste boja.

U VBA imamo dva načina primjene boje, prvi je pomoću svojstva "color", a drugi pomoću svojstva "ColorIndex".

Stanicu nanosimo kao boju pozadine, boju fonta i boju obruba. Dakle, da bismo pristupili svojstvu boje i indeksa boja, prvo moramo odabrati ćeliju.

Kako koristiti svojstvo Boja i indeks boja?

# 1 - Korištenje svojstva boje

Pretpostavimo da imate riječ "Zdravo" u ćeliji A1. Vidjet ćemo kako primijeniti boju pozadine ove ćelije.

Da bismo promijenili boju pozadine, u svojstvima boja, prvo moramo spomenuti raspon ćelije.

Kodirati:

Podboja () Raspon ("A1") Kraj Pod

Nakon odabira stanice, moramo spomenuti što je stvar koju trebamo učiniti. Kao što sam rekao, moramo promijeniti unutarnju boju ćelije. Dakle, da biste promijenili boju pozadine ćelije, upotrijebite svojstvo "Interijer".

Kodirati:

Podboja () Raspon ("A1"). Unutrašnji kraj Sub

Pod Svojstvom interijera imamo nekoliko drugih metoda i svojstava. Budući da moramo promijeniti boju stanice, koristite svojstvo boje.

Kodirati:

Podboja () Raspon ("A1"). Interior.Color = Kraj Sub

Ovdje možemo koristiti 8 boja koje se neprestano imenuju. Ispod je popis istih.

vbBlack, vbRed, vbGreen, vbBlue, vbŽuti, vbMagenta, vbCyan, vbWhite

Odaberite vrstu boje prema vašoj želji.

Kodirati:

Podboja () Raspon ("A1"). Interijer.Boja = vbPlavi kraj Sub

Ako ovaj kôd pokrenem pomoću tipke F5 ili ručno, promijenit će boju pozadine ćelije A1 u vrijednost .

Ovako, možete koristiti druge konstantno imenovane boje. Pokušajte ih koristiti za testiranje rezultata.

Osim ovih 8 stalnih boja, možemo ispuniti i različitim bojama pomoću RGB funkcije u VBA.

Kodirati:

Podboja () Raspon ("A1"). Interijer.Boja = RGB (Krajnji sub

Moramo unijeti mješavinu crvene, zelene i plave u brojevima. Da biste to iskoristili, trebali biste biti savršeni u unosu brojeva. Smjesu sam unio kao RGB (250, 200, 150).

Kodirati:

Podboja () Raspon ("A1"). Interijer.Boja = RGB (250, 200, 150) Kraj Sub

Promjena ove boje je takva.

Problem je u tome što ne znate točno koji broj sadrži koju boju.

Dolje je kod za promjenu boje fonta.

Kodirati:

Sub Color_Font () Raspon ("A1"). Font.Color = RGB (100, 400, 100) Kraj Sub

Pokrenite ovaj kôd pomoću tipke F5 ili ručno da biste dobili rezultat.

# 2 - Korištenje svojstva indeksa boja

Indeks boja malo se razlikuje od svojstva boje. U svojstvu COLOR koristimo 8 konstantnih boja koje daje VBA, a također pomoću RGB funkcije stvaramo vlastitu boju.

Svojstvo COLOR INDEX ograničeno je na VBA. Može sadržavati vrijednosti od 1 do 56. Svaki broj od 1 do 56 ima različite boje. Ispod su brojevi popisa i njihove boje.

Ispod je makronaredba za promjenu boje pozadine ćelije A1 u ružičastu.

Kodirati:

Podopseg ColorIndex_Cell () Raspon ("A1"). Interior.ColorIndex = 26 Kraj Sub

Pokrenite ovaj kod ručno ili pomoću tipke F5 da biste vidjeli rezultat.

Ispod je makronaredba za promjenu boje fonta ćelije A1 u žutu.

Kodirati:

Sub ColorIndex_Font () Raspon ("A1"). Font.ColorIndex = 27 Kraj Sub

Pokrenite ovaj kôd pomoću tipke F5 ili možete pokrenuti ručno i vidjeti rezultat.

Jedna od važnih stvari koje ovdje treba imati na umu jest da možemo unijeti brojeve od 1 do 56. Ako je nešto više od 56, dobit ćemo pogrešku "Subscript Out Of Range".

Jeste li promatrali?

Kao što sam rekao Color Index, svojstvo može umetnuti samo 56 boja, ali činjenica je da može umetnuti samo 46 jedinstvenih boja, a postoji 10 duplikata boja. Ispod je popis dvostrukih kodova boja.

Zanimljivi članci...