VBA RGB | Állítsa be a belső cella színét az RGB funkció használatával

Excel VBA RGB színes

Az RGB- t piros zöldnek és kéknek is nevezhetjük, ezt a funkciót használjuk a színérték numerikus értékének megszerzésére, ennek a funkciónak három összetevője van, mint megnevezett tartomány, és piros, kék és zöld, a többi színt alkotóelemnek tekintjük ebből a három különböző színből a VBA-ban.

A VBA-ban minden az egyes darabok kódolásáig áll, például, ha hivatkozni akar a munkalap bizonyos részeire, akkor használhatjuk a RANGE objektumot, ha meg akarja változtatni a betűtípus színét, akkor felhasználhatjuk a NAME tulajdonságot írja be a betűkészlet nevét, amelyre szükségünk van, de képzeljen el egy helyzetet a cella betűtípusának vagy háttérszínének megváltoztatásához, ehhez használhatunk beépített VB színeket, például, vbGreen, vbBlue, vbRed stb. külön funkcióval rendelkezünk, hogy különböző színekkel játsszunk, azaz RGB funkcióval.

Az alábbiakban látható az RGB színfüggvény szintaxisa.

Amint a fentiekből látható, három érvet adhatunk meg: vörös, zöld és kék. Mindhárom paraméter csak 0 és 255 közötti egész számokat fogad el, és ennek a függvénynek az eredménye „Hosszú” adattípus lesz.

A cellák színének megváltoztatása a VBA RGB funkcióval

Ezt a VBA RGB Excel sablont innen töltheti le - VBA RGB Excel sablont

1. példa

Például vannak számaink az A1-től A8-as celláig, amint az az alábbi képen látható.

Ehhez a cellatartományhoz megpróbáljuk a betűszínt valamilyen véletlenszerű színre változtatni az RGB funkció használatával.

Először indítsa el a makró eljárást.

Kód:

 Sub RGB_Példa1 () End Sub 

Először hivatkoznunk kell a betűtípusok cellatartományára, amelynek színét meg akarjuk változtatni, ebben az esetben a cellatartományunk A1-től A8-ig terjed, tehát ugyanazt a RANGE objektum használatával adjuk meg .

Kód:

 Sub RGB_Példa1 () Tartomány ("A1: A8") Vége Sub 

Helyezzen pontot a RANGE objektum IntelliSense listájának megtekintéséhez. Az IntelliSense listából megpróbáljuk megváltoztatni a betűtípus színét, ezért válassza a FONT tulajdonságot a listából.

Kód:

 Sub RGB_Példa1 () Tartomány ("A1: A8"). Betűtípus vége Al 

Miután kiválasztotta a FONT tulajdonságot ebben a tulajdonságban, megpróbáljuk megváltoztatni a színét , ezért válassza ki a FONT színtulajdonságát.

Kód:

 Sub RGB_Példa1 () Tartomány ("A1: A8"). Betűtípus. Szín Vége Al 

Tegyen egyenlőségjelet és nyissa meg az RGB funkciót.

Kód:

 Sub RGB_Példa1 () Tartomány ("A1: A8"). Font.Color = RGB (End Sub 

Adjon meg véletlenszerű, 0 és 255 közötti egész számokat az RGB függvény mindhárom argumentumához.

Kód:

 Sub RGB_Példa1 () Tartomány ("A1: A8"). BetűtípusColor = RGB (300, 300, 300) Vége Sub 

Ok, most futtasd a kódot, és nézd meg az A1 és A8 közötti cellák betűszínének eredményét.

Kimenet:

Tehát a betűtípus színei feketéről másra változtak. A szín az RGB funkciónak adott számoktól függ.

Az alábbiakban RGB színkódok találhatók, hogy a leggyakoribb színeket kapjuk.

Csak módosíthatja az egész számkombinációt 0-ról 255-re, hogy megkapja a különböző típusú színeket.

2. példa

Ugyanazon cellatartománynál nézzük meg, hogyan lehet megváltoztatni e cellák háttérszínét.

Először adja meg a cellák tartományát a RANGE objektum használatával.

Kód:

Sub RGB_Példa2 () Tartomány ("A1: A8"). End Sub

Ezúttal megváltoztatjuk az említett cellák háttérszínét, így most semmi közünk a FONT tulajdonsághoz a háttérszín megváltoztatásához válassza a RANGE objektum „ Interior ” tulajdonságát.

Kód:

 Sub RGB_Példa2 () Tartomány ("A1: A8") 

Miután kiválasztotta a „Interior” tulajdonságot, tegyen egy pontot a „Interior” tulajdonság tulajdonságainak és módszereinek megtekintéséhez.

Kód:

Sub RGB_Példa2 () Tartomány ("A1: A8"). Belső. End Sub

Mivel megváltoztatjuk az említett cellák belső színét, válassza a „ Color ” tulajdonságot.

Kód:

 Sub RGB_Példa2 () Tartomány ("A1: A8"). Belső.Color End Sub 

A cellatartomány belső színtulajdonságának (A1-től A8-ig) beállításához tegye ki az egyenlőségjelet és nyissa meg az RGB funkciót.

Kód:

 Sub RGB_Példa2 () Tartomány ("A1: A8"). Interior.Color = RGB (End Sub 

Adja meg a véletlenszerű számot, ahogy akarja.

Kód:

 Sub RGB_Example2 () Range ("A1: A8"). Interior.Color = RGB (0, 255, 255) End Sub 

Futtassa a kódot, és nézze meg a háttér színét.

Kimenet:

A háttér színe megváltozott.

Amire itt emlékezni kell

• Az RGB jelentése vörös, zöld és kék.
• E három szín kombinációja különböző színeket ad.
• Mindhárom paraméter csak 0 és 255 közötti egész értékeket fogad el. Bármely e fölötti szám 255-re áll vissza.