Farba Excel VBA RGB
RGB možno tiež označiť ako červeno zelenú a modrú, táto funkcia sa používa na získanie číselnej hodnoty farebnej hodnoty. Táto funkcia má tri komponenty ako pomenovaný rozsah a sú červené, modré a zelené, ostatné farby sa považujú za komponenty. z týchto troch rôznych farieb vo VBA.
Vo VBA sa všetko scvrkáva na kódovanie každého dielu, napríklad ak chcete odkazovať na určitú časť tabuľky, môžeme použiť objekt RANGE, ak chcete zmeniť farbu písma, môžeme použiť vlastnosť NAME rozsahu potom napíšeme názov písma, ktorý sme potrebovali, ale predstavme si situáciu zmeny farby písma alebo farby pozadia bunky, na čo môžeme použiť vstavané farby VB ako, vbGreen, vbBlue, vbRed atď ... Ale máme vyhradenú funkciu na hranie s rôznymi farbami, tj. funkciu RGB.
Nižšie je uvedená syntax farebnej funkcie RGB.
Ako vidíte vyššie, môžeme dodať tri argumenty, tj červený, zelený a modrý. Všetky tieto tri parametre môžu prijímať iba celé čísla od 0 do 255 a výsledkom tejto funkcie bude dátový typ „Long“.
Zmeňte farbu buniek pomocou funkcie VBA RGB
Túto šablónu VBA RGB Excel si môžete stiahnuť tu - Šablóna VBA RGB ExcelPríklad č
Napríklad máme čísla od bunky A1 po A8, ako je znázornené na obrázku nižšie.
Pre tento rozsah buniek sa pokúsime zmeniť farbu písma na nejakú náhodnú farbu pomocou funkcie RGB.
Najprv spustite postup makra.
Kód:
Sub RGB_Example1 () End Sub
Najprv musíme odkázať na rozsah buniek fontov, ktoré chceme zmeniť farbu, v tomto prípade je náš rozsah buniek A1 až A8, takže ich dodáme pomocou objektu RANGE .
Kód:
Sub RGB_Example1 () Range ("A1: A8") End Sub 
Dajte bodku, aby ste videli zoznam IntelliSense objektu RANGE, zo zoznamu IntelliSense sa snažíme zmeniť farbu písma, a tak vyberte zo zoznamu vlastnosť FONT .
Kód:
Sub RGB_Example1 () Rozsah ("A1: A8"). Koniec písma Sub 
Len čo v tejto vlastnosti vyberieme vlastnosť FONT, pokúšame sa zmeniť farbu , takže zvoľte farebnú vlastnosť FONT.
Kód:
Sub RGB_Example1 () Range ("A1: A8"). Font.Color End Sub 
Vložte rovnaké znamienko a otvorte funkciu RGB.
Kód:
Sub RGB_Example1 () Range ("A1: A8"). Font.Color = RGB (End Sub 
Pre všetky tri argumenty funkcie RGB uveďte náhodné celé čísla v rozsahu od 0 do 255.
Kód:
Sub RGB_Example1 () Range ("A1: A8"). Font.Color = RGB (300, 300, 300) End Sub 
Ok, teraz spustite kód a pozrite si výsledok farieb písma buniek od A1 po A8.
Výkon:
Farby písma sa teda zmenili z čiernej na inú. Farba závisí od čísel, ktoré priradíme funkcii RGB.
Ďalej sú uvedené farebné kódy RGB, pomocou ktorých získate niektoré z bežných farieb.
Ak chcete získať rôzne druhy farieb, stačí zmeniť kombináciu celých čísel z 0 na 255.
Príklad č
Pre rovnaký rozsah buniek sa pozrime, ako zmeniť farbu pozadia týchto buniek.
Najskôr zadajte rozsah buniek pomocou objektu RANGE .
Kód:
Sub RGB_Example2 () Range ("A1: A8"). Koniec Sub
Tentokrát meníme farbu pozadia spomenutých buniek, takže nemáme nič spoločné s vlastnosťou FONT, aby sme teraz zmenili farbu pozadia, zvoľte vlastnosť „ Interiér “ objektu RANGE.
Kód:
Sub RGB_Example2 () Rozsah ("A1: A8"). Vnútorný koniec Sub 
Po výbere vlastnosti „Interiér“ vložte bodku, aby ste videli vlastnosti a metódy tejto vlastnosti „Interiér“.
Kód:
Sub RGB_Example2 () Range ("A1: A8"). Interiér. Koniec Sub
Pretože meníme farbu interiéru uvedených buniek, zvoľte vlastnosť „ Color “.
Kód:
Sub RGB_Example2 () Range ("A1: A8"). Interior.Color End Sub 
Ak chcete nastaviť vlastnosť farby interiéru rozsahu buniek (A1 až A8), znamienko rovnosti a otvorte funkciu RGB.
Kód:
Sub RGB_Example2 () Range ("A1: A8"). Interior.Color = RGB (End Sub 
Zadajte náhodné číslo, ako chcete.
Kód:
Sub RGB_Example2 () Range ("A1: A8"). Interior.Color = RGB (0, 255, 255) End Sub 
Spustite kód a uvidíte farbu pozadia.
Výkon:
Farba pozadia bola zmenená.
Tu si treba pamätať
- RGB znamená červená, zelená a modrá.
- Kombinácia týchto troch farieb poskytne rôzne farby.
- Všetky tieto tri parametre môžu akceptovať iba celočíselné hodnoty od 0 do 255. Všetky čísla nad touto hodnotou sa resetujú na 255.