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, vbWhiteVyberte 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.