Table Of Contents
Excel VBA RGB Color
RGB can also be called red, green, and blue. So, one may use this function to get the numerical value of the color value. This function has three components as a named range, and they are red, blue, and green. The other colors are the components of these three different colors in VBA.
In VBA, everything boils down to the coding of every piece. For example, we can use the RANGE object if you want to reference some portion of the worksheet. If you want to change the font color, we can use the NAME property of the range. Then, write the font name that we need but imagine a situation of changing the font color or the cell's background color. Of course, we can use built-in VB colors like vbGreen, vbBlue, vbRed, etc. But, we have a dedicated function to play around with different colors, i.e., RGB.
Below is the syntax of the RGB color function.
As you can see above, we can supply three arguments: red, green, and blue. These three parameters can only accept integer numbers ranging from 0 to 255. The result of this function will be the "Long" data type.
Change Color of Cells using VBA RGB Function
Example #1
We have numbers from cells A1 to A8, as shown in the below image.
We will try to change the font color to some random color for this range of cells by using the RGB function.
Start the macro procedure first.
Code:
Sub RGB_Example1() End Sub
First, we need to reference the range of cells of fonts we want to change the color of. In this case, our range of cells is A1 to A8, so supply the same using the RANGE object.
Code:
Sub RGB_Example1() Range ("A1:A8") End Sub
Put a dot to see the IntelliSense list of RANGE objects. From the IntelliSense list, we are trying to change the font color, so choose the FONT property from the list.
Code:
Sub RGB_Example1() Range("A1:A8").Font End Sub
Once we chose the FONT property in this property, we tried to change the color, so we chose the color property of the FONT.
Code:
Sub RGB_Example1() Range("A1:A8").Font.Color End Sub
Put an equal sign and open the RGB function.
Code:
Sub RGB_Example1() Range("A1:A8").Font.Color = RGB( End Sub
Give random integer numbers ranging from 0 to 255 for all three arguments of the RGB function.
Code:
Sub RGB_Example1() Range("A1:A8").Font.Color = RGB(300, 300, 300) End Sub
Now, run the code and see the result of font colors of the cells from A1 to A8.
Output:
So, the colors of the font changed from black to some other. The color depends on the numbers we give to the RGB function.
Below are RGB color codes to get some of the common colors.
You can just change the integer number combination from 0 to 255 to get the different sorts of colors.
Example #2
For the same range of cells, let us see how to change the background color of these cells.
First, supply the range of cells by using the RANGE object.
Code:
Sub RGB_Example2() Range ("A1:A8"). End Sub
This time we are changing the background color of the mentioned cells, so we have nothing to do with the FONT property. Now, choose the "Interior" property of the RANGE object to change the background color.
Code:
Sub RGB_Example2() Range("A1:A8").Interior End Sub
Once the “Interior” property is selected, a dot to see the properties and methods of this “Interior” property.
Code:
Sub RGB_Example2() Range("A1:A8").Interior. End Sub
Since we are changing the interior color of the mentioned cells, choose the “Color” property.
Code:
Sub RGB_Example2() Range("A1:A8").Interior.Color End Sub
Set the interior color property of the range of cells (A1 to A8) out the equal sign and open the RGB function.
Code:
Sub RGB_Example2() Range("A1:A8").Interior.Color = RGB( End Sub
Enter the random number as you want.
Code:
Sub RGB_Example2() Range("A1:A8").Interior.Color = RGB(0, 255, 255) End Sub
Run the code and see the background color.
Output:
The background color has changed.
Things to Remember Here
- RGB stands for Red, Green, and Blue.
- A combination of these three colors will give different colors.
- All these three parameters can accept integer values between 0 to 255 only. It will reset any numbers above this to 255.