Obsah
V tomto článku vám ukážu, jak můžete použít funkci ColorIndex vlastnost v aplikaci Excel VBA . Naučíte se nastavit barvu pozadí, písma a rámečku jedné nebo více buněk pomocí vlastnosti ColorIndex. VBA a také nastavit barvu jedné buňky podle barvy jiné buňky.
Kódy ColorIndex aplikace Excel VBA
Než přejdete k hlavní diskusi, podívejte se na obrázek níže, abyste věděli, jak vypadá ColorIndex všech barev dostupných v aplikaci Excel VBA .
Stáhnout cvičebnici
Stáhněte si tento cvičební sešit a procvičte si při čtení tohoto článku.
VBA ColorIndex.xlsm4 příklady použití vlastnosti ColorIndex v aplikaci Excel VBA
Zde máme datovou sadu se znakem Jména, nástupní platy a Současné platy některých zaměstnanců společnosti Jupyter Group.
Naším cílem je vidět různá využití ColorIndex vlastnost VBA na tomto souboru dat.
1. Nastavení barvy pozadí buňky pomocí ColorIndex v aplikaci Excel VBA
Barvu pozadí buňky můžete nastavit na libovolnou barvu pomocí příkazu ColorIndex vlastnost VBA .
Změníme barvu pozadí rozsahu B4:B13 na zelenou.
⧭ Kód VBA:
Řádek kódu bude:
Range("B4:B13").Interior.ColorIndex = 10
[10 je ColorIndex barvy zelená . Viz barevná tabulka.]
⧭ Výstup:
Spusťte tento kód a zjistíte barvu pozadí rozsahu B4:B13 obrátil na zelená .
2. Nastavení barvy písma v buňce pomocí ColorIndex v aplikaci Excel VBA
Můžete také nastavit barvu písma textu v libovolné buňce pomocí příkazu ColorIndex vlastnost aplikace Excel VBA .
Změníme barvu písma rozsahu B4:B13 na červenou.
⧭ Kód VBA:
Řádek kódu bude:
Range("B4:B13").Font.ColorIndex = 3
[3 je ColorIndex z Červená .]
⧭ Výstup:
Spusťte tento kód a zjistíte barvu písma v rozsahu B4:B13 obrátil na červená .
3. Nastavení barvy okraje buňky pomocí ColorIndex v aplikaci Excel VBA
Nyní nastavíme barvu okraje buňky pomocí příkazu ColorIndex vlastnost VBA .
Změníme barvu okraje rozsahu B4:B13 na červenou.
⧭ Kód VBA:
Řádek kódu bude:
Range("B4:B13").Borders.ColorIndex = 3
⧭ Výstup:
Spusťte tento kód. Změní barvu okrajů rozsahu. B4:B13 na červenou.
4. Nastavení barvy buňky na barvu jiné buňky pomocí indexu ColorIndex
Nakonec vám ukážu, že můžete změnit barvu jedné buňky podle barvy jiné buňky.
Změníme barvu pozadí buňky B5 na zelená .
Nyní změníme barvu pozadí buňky D5 podle buňky B5 .
⧭ Kód VBA:
Řádek kódu bude:
Range("D5").Interior.ColorIndex = Range("B5").Interior.ColorIndex
⧭ Výstup:
Spusťte tento kód. Změní se barva pozadí buňky D5 podle buňky B5 .
Podobně můžete změnit barvu písma nebo barvu rámečku libovolné buňky podle barvy jiné buňky pomocí příkazu ColorIndex nemovitosti.
Další vzdělávání
V tomto článku jsme změnili barvu buněk pomocí příkazu ColorIndex vlastnost VBA .
Kromě toho ColorIndex existuje další vlastnost nazvaná Barva na adrese VBA , která se zabývá barvami.
Kliknutím sem se s ním podrobně seznámíte.