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

Tartalomjegyzék

Excel VBA RGB színes

Az RGB piros zöldnek és kéknek is nevezhető, ezt a funkciót használjuk a színérték számé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 egyes darab kódolásáig áll. Például, ha hivatkozni szeretne a munkalap egyes részeire, akkor használhatjuk a RANGE objektumot. Ha meg akarja változtatni a betűtípus színét, akkor felhasználhatjuk a tartomány NAME tulajdonságát, majd megírhatjuk a szükséges betűkészlet nevét, de elképzelhetünk egy helyzetet a cella betűtípusának vagy háttérszínének megváltoztatásához ehhez: használhatja a beépített VB színeket, mint például a vbGreen, vbBlue, vbRed stb. … De 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.

Mint fent láthatja, három érvet adhatunk meg: Piros, 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 a „Hosszú” adattípus lesz.

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

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űkészletek cellatartományára, amelyek színét meg akarjuk változtatni. Ebben az esetben cellatartományunk A1-től A8-ig terjed, tehát a RANGE objektum használatával adja meg ugyanezt .

Kód:

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

Helyezze a 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:

Al 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"). Font.Color = 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 az 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ány esetén 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 a FONT tulajdonsággal most nincs dolgunk a háttérszín megváltoztatásához, válasszuk a RANGE objektum „ Interior ” tulajdonságát.

Kód:

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

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.

érdekes cikkek...