VBA RGB - Définir la couleur de la cellule intérieure à l'aide de la fonction RVB

Couleur RVB Excel VBA

RVB peut également être appelé rouge, vert et bleu, cette fonction est utilisée pour obtenir la valeur numérique de la valeur de couleur, cette fonction a trois composants comme plage nommée et ils sont rouge, bleu et vert les autres couleurs sont considérées comme les composants de ces trois couleurs différentes dans VBA.

Dans VBA, tout se résume au codage de chaque pièce. Par exemple, si vous souhaitez référencer une partie de la feuille de calcul, nous pouvons utiliser l'objet RANGE. Si vous souhaitez changer la couleur de la police, nous pouvons utiliser la propriété NAME de la plage, puis écrire le nom de la police dont nous avions besoin, mais imaginez une situation de changement de la couleur de la police ou de la couleur d'arrière-plan de la cellule pour cela, nous peut utiliser des couleurs VB intégrées comme, vbGreen, vbBlue, vbRed, etc.… Mais nous avons une fonction dédiée pour jouer avec différentes couleurs, c'est-à-dire la fonction RVB.

Voici la syntaxe de la fonction de couleur RVB.

Comme vous pouvez le voir ci-dessus, nous pouvons fournir trois arguments, à savoir, rouge, vert et bleu. Tous ces trois paramètres peuvent accepter uniquement des nombres entiers allant de 0 à 255, et le résultat de cette fonction sera le type de données «Long».

Changer la couleur des cellules à l'aide de la fonction RVB VBA

Exemple 1

Par exemple, nous avons des nombres de la cellule A1 à A8, comme indiqué dans l'image ci-dessous.

Pour cette plage de cellules, nous allons essayer de changer la couleur de la police en une couleur aléatoire en utilisant la fonction RVB.

Commencez par démarrer la procédure de macro.

Code:

Sub RGB_Example1 () End Sub

Tout d'abord, nous devons référencer la plage de cellules de polices dont nous voulons changer la couleur. Dans ce cas, notre plage de cellules va de A1 à A8, donc fournissez-la en utilisant l' objet RANGE .

Code:

Sub RGB_Example1 () Range ("A1: A8") End Sub

Placez un point pour voir la liste IntelliSense de l'objet RANGE. Dans la liste IntelliSense, nous essayons de changer la couleur de la police et choisissons donc la propriété FONT dans la liste.

Code:

Sub RGB_Example1 () Range ("A1: A8"). Police End Sub

Une fois que la propriété FONT a été choisie dans cette propriété, nous essayons de changer la couleur , alors choisissez la propriété color de la FONT.

Code:

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

Mettez le signe égal et ouvrez la fonction RVB.

Code:

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

Donnez des nombres entiers aléatoires allant de 0 à 255 pour les trois arguments de la fonction RVB.

Code:

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

Ok, maintenant exécutez le code et voyez le résultat des couleurs de police des cellules de A1 à A8.

Production:

Ainsi, les couleurs de la police sont passées du noir à un autre. La couleur dépend des nombres que nous attribuons à la fonction RVB.

Vous trouverez ci-dessous des codes de couleur RVB pour obtenir certaines des couleurs courantes.

Vous pouvez simplement changer la combinaison de nombres entiers de 0 à 255 pour obtenir les différentes sortes de couleurs.

Exemple # 2

Pour la même plage de cellules, voyons comment changer la couleur d'arrière-plan de ces cellules.

Tout d'abord, fournissez la plage de cellules à l'aide de l' objet RANGE .

Code:

Plage Sub RGB_Example2 () ("A1: A8"). End Sub

Cette fois, nous changeons la couleur d'arrière-plan des cellules mentionnées, donc nous n'avons plus rien à voir avec la propriété FONT maintenant pour changer la couleur d'arrière-plan, choisissez la propriété « Intérieur » de l'objet RANGE.

Code:

Sub RGB_Example2 () Range ("A1: A8"). Intérieur End Sub

Une fois la propriété «Intérieur» sélectionnée, un point de mise pour voir les propriétés et les méthodes de cette propriété «Intérieur».

Code:

Gamme Sub RGB_Example2 () ("A1: A8"). Intérieur. End Sub

Puisque nous changeons la couleur intérieure des cellules mentionnées, choisissez la propriété « Couleur ».

Code:

Sub RGB_Example2 () Range ("A1: A8"). Interior.Color End Sub

Pour définir la propriété de couleur intérieure de la plage de cellules (A1 à A8), sortez le signe égal et ouvrez la fonction RVB.

Code:

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

Entrez le nombre aléatoire comme vous le souhaitez.

Code:

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

Exécutez le code et voyez la couleur d'arrière-plan.

Production:

La couleur de fond a été modifiée.

Choses à retenir ici

• RVB signifie rouge, vert et bleu.
• Une combinaison de ces trois couleurs donnera des couleurs différentes.
• Ces trois paramètres ne peuvent accepter que des valeurs entières comprises entre 0 et 255. Tout nombre supérieur à ce chiffre sera réinitialisé à 255.