Farebný index VBA | Najlepšie spôsoby použitia vlastnosti indexu farieb v programe Excel VBA

Farebný index Excel VBA

Rovnako ako v pracovnom hárku, na karte Domov vo VBA zmeníme farbu bunky alebo daný rozsah buniek. Máme funkciu vba nazývanú ako index farieb, ktorá sa používa na zmenu farieb buniek alebo poskytovaného rozsahu buniek. Táto funkcia má jedinečnú identifikáciu pre rôzne typy farieb.

Vo VBA máme dva spôsoby použitia farby, prvý je pomocou vlastnosti „color“ a druhý pomocou vlastnosti „ColorIndex“.

Na bunku nanesieme farbu ako farbu pozadia, farbu písma a farbu orámovania. Pre prístup k vlastnosti farieb a indexov farieb musíme najskôr vybrať bunku.

Ako používať vlastnosť Color & Color Index?

Túto šablónu farebného indexu VBA si môžete stiahnuť tu - Šablóna farebného indexu VBA

# 1 - Používanie vlastnosti farieb

Predpokladajme, že v bunke A1 máte slovo „ahoj“. Uvidíme, ako použiť farbu pozadia tejto bunky.

Ak chcete zmeniť farbu pozadia, vo vlastnostiach farieb musíme najskôr spomenúť rozsah bunky.

Kód:

 Sub Color () Rozsah ("A1") End Sub 

Po výbere bunky musíme spomenúť, čo je vec, ktorú musíme urobiť. Ako som už povedal, musíme zmeniť farbu interiéru bunky. Ak chcete teda zmeniť farbu pozadia bunky, použite vlastnosť „Interiér“.

Kód:

 Rozsah vedľajšej farby () ("A1") 

V časti Vlastníctvo interiéru máme niekoľko ďalších metód a vlastností. Pretože musíme zmeniť farbu bunky, použite vlastnosť color.

Kód:

 Rozsah vedľajšej farby () ("A1"). Interior.Color = koncový vedľajší 

Tu môžeme použiť 8 neustále pomenovaných farieb. Nižšie je uvedený zoznam rovnakých.

vbBlack, vbRed, vbGreen, vbBlue, vbYellow, vbMagenta, vbCyan, vbWhite

Vyberte si farebný typ podľa vášho želania.

Kód:

 Rozsah podfarbenia () ("A1"). Interior.Color = vbBlue Koniec pod 

Ak spustím tento kód pomocou klávesu F5 alebo ručne, zmení sa farba pozadia bunky A1 na vbBlue.

Takto môžete použiť ďalšie konštantne pomenované farby. Skúste ich použiť na otestovanie výsledku.

Okrem týchto 8 konštantných farieb môžeme tiež vyplniť rôzne farby pomocou funkcie RGB vo VBA.

Kód:

 Rozsah podfarbenia () ("A1"). Interior.Color = RGB (koncový pod 

Musíme zadať zmes červenej, zelenej a modrej v číslach. Aby ste to mohli využiť, mali by ste byť pri zadávaní čísel perfektní. Zadal som zmes ako RGB (250, 200, 150).

Kód:

 Rozsah vedľajšej farby () ("A1"). Interior.Color = RGB (250, 200, 150) Koncový vedľajší 

Zmena tejto farby je taká.

Problém je v tom, že neviete presne, aké číslo zodpovedá ktorej farbe.

Nasledujúci kód slúži na zmenu farby písma.

Kód:

 Sub Color_Font () Range ("A1"). Font.Color = RGB (100, 400, 100) End Sub 

Tento kód spustíte pomocou klávesu F5 alebo manuálne, aby ste dosiahli výsledok.

# 2 - Používanie vlastnosti indexu farieb

Farebný index sa mierne líši od vlastnosti farieb. Vo vlastnosti COLOR používame 8 konštantných farieb daných VBA a tiež pomocou funkcie RGB vytvárame vlastnú farbu.

Vlastnosť COLOR INDEX je vo VBA obmedzená, môže obsahovať hodnoty od 1 do 56. Každé číslo od 1 do 56 obsahuje rôzne farby. Ďalej sú uvedené zoznamové čísla a ich príslušné farby.

Nižšie je uvedený kód makra na zmenu farby pozadia bunky A1 na ružovú.

Kód:

 Sub ColorIndex_Cell () Range ("A1"). Interior.ColorIndex = 26 End Sub 

Spustite tento kód manuálne alebo pomocou klávesu F5, aby ste videli výsledok.

Nižšie je uvedený kód makra na zmenu farby písma bunky A1 na žltú.

Kód:

 Sub ColorIndex_Font () Range ("A1"). Font.ColorIndex = 27 End Sub 

Spustite tento kód pomocou klávesu F5 alebo môžete spustiť manuálne a pozrieť si výsledok.

Jednou z dôležitých vecí, ktorú si tu treba pamätať, je, že môžeme zadávať čísla od 1 do 56. Ak je niečo viac ako 56, zobrazí sa chyba „Dolný index mimo rozsah“.

Pozorovali ste?

Ako som povedal, vlastnosť Color Index môže vložiť iba 56 farieb, ale je pravda, že môže vložiť iba 46 jedinečných farieb a existuje 10 duplicitných farieb. Nižšie je uvedený zoznam duplicitných farebných kódov.