VBA RGB | Aseta sisäkennon väri RGB-toiminnolla

Excel VBA RGB -väri

RGB: tä voidaan kutsua myös punaiseksi vihreäksi ja siniseksi, tätä toimintoa käytetään väriarvon numeerisen arvon saamiseen, tällä toiminnolla on kolme komponenttia nimettynä alueena ja ne ovat punaisia, sinisiä ja vihreitä, muita värejä pidetään komponentteina näistä kolmesta eri väristä VBA: ssa.

VBA: ssa kaikki yhdistyy jokaisen kappaleen koodaukseen, esimerkiksi, jos haluat viitata johonkin laskentataulukon osaan, voimme käyttää RANGE-objektia, jos haluat muuttaa kirjasimen väriä, voimme käyttää NAME-ominaisuutta Kirjoita sitten kirjasimen nimi, jota tarvitsemme, mutta kuvittele tilanne, jossa solun kirjasimen tai taustavärin väri muuttuu, jotta voimme käyttää sisäänrakennettuja VB-värejä, kuten vbGreen, vbBlue, vbRed jne ... Meillä on oma toiminto, jolla voi pelata eri väreillä, ts. RGB-toiminto.

Alla on RGB-väritoiminnon syntaksi.

Kuten yllä voit nähdä, voimme toimittaa kolme argumenttia eli punaisen, vihreän ja sinisen. Kaikki nämä kolme parametria voivat hyväksyä vain kokonaislukuja välillä 0 - 255, ja tämän toiminnon tulos on "Pitkä" tietotyyppi.

Vaihda solujen väriä VBA RGB -toiminnolla

Voit ladata tämän VBA RGB Excel -mallin täältä - VBA RGB Excel -malli

Esimerkki 1

Esimerkiksi meillä on numeroita solusta A1 A8, kuten alla olevassa kuvassa on esitetty.

Tälle solualueelle yritämme muuttaa kirjasimen värin satunnaiseksi käyttämällä RGB-toimintoa.

Aloita ensin makromenettely.

Koodi:

 Sub RGB_Example1 () End Sub 

Ensinnäkin meidän on viitattava kirjasinten solualueeseen, jonka väriä haluamme muuttaa, tässä tapauksessa solualueemme on A1 - A8, joten toimita sama käyttämällä RANGE- objektia.

Koodi:

 RGB_esimerkki1 () -alue ("A1: A8") Alalohko 

Laita piste nähdäksesi RANGE-objektin IntelliSense-luettelon. Yritämme muuttaa kirjasimen väriä IntelliSense-luettelosta ja valitse luettelosta FONT- ominaisuus.

Koodi:

 Sub RGB_Example1 () -alue ("A1: A8"). Kirjasimen loppu Sub 

Kun FONT-ominaisuus on valittu tässä ominaisuudessa, yritämme vaihtaa väriä , joten valitse FONT-värin ominaisuus.

Koodi:

 Sub RGB_Example1 () Range ("A1: A8"). Fontti.Väri End Sub 

Laita yhtäläisyysmerkki ja avaa RGB-toiminto.

Koodi:

 Sub RGB_Example1 () Range ("A1: A8"). Font.Color = RGB (End Sub 

Anna satunnaiset kokonaisluvut välillä 0–255 kaikille RGB-funktion kolmelle argumentille.

Koodi:

 Sub RGB_Example1 () Range ("A1: A8"). Font.Color = RGB (300, 300, 300) End Sub 

Ok, suorita nyt koodi ja katso A1 - A8 solujen kirjasinvärien tulos.

Tuotos:

Joten kirjasimen värit muuttuivat mustasta muuhun. Väri riippuu RGB-toiminnolle antamistamme numeroista.

Alla on RGB-värikoodit saadaksesi joitain yleisimpiä värejä.

Voit vain muuttaa kokonaislukuyhdistelmän 0: sta 255: een saadaksesi erilaisia ​​värejä.

Esimerkki 2

Katsotaan samalla solualueella, kuinka näiden solujen taustaväriä muutetaan.

Anna ensin solualue alue RANGE- objektilla.

Koodi:

Sub RGB_esimerkki2 () -alue ("A1: A8"). End Sub

Tällä kertaa muutamme mainittujen solujen taustaväriä, joten meillä ei ole mitään tekemistä FONT-ominaisuuden kanssa nyt vaihtaaksemme taustaväriä, valitse RANGE-objektin Sisustus- ominaisuus.

Koodi:

 RGB_esimerkki2 () -alue ("A1: A8") 

Kun Sisustus-ominaisuus on valittu, laita piste nähdäksesi tämän Sisustus-ominaisuuden ominaisuudet ja menetelmät.

Koodi:

RGB_esimerkki2 () -alue ("A1: A8"). Sisustus. End Sub

Koska muutamme mainittujen solujen sisäistä väriä, valitse ominaisuus " Väri ".

Koodi:

 Sub RGB_Example2 () -alue ("A1: A8"). Sisustus.Väri End Sub 

Määritä solualueen (A1 - A8) sisäisen värin ominaisuus pois yhtäläisyysmerkki ja avoin RGB-toiminto.

Koodi:

 Sub RGB_esimerkki2 () -alue ("A1: A8"). Interior.Color = RGB (End Sub 

Syötä satunnaisluku haluamallasi tavalla.

Koodi:

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

Suorita koodi ja katso taustaväri.

Tuotos:

Taustan väriä on muutettu.

Muistettavaa täällä

  • RGB tarkoittaa punaista, vihreää ja sinistä.
  • Näiden kolmen värin yhdistelmä antaa erilaiset värit.
  • Kaikki nämä kolme parametria voivat hyväksyä vain kokonaislukuja välillä 0 - 255. Kaikki tämän yläpuolella olevat numerot palautetaan 255: ksi.

$config[zx-auto] not found$config[zx-overlay] not found