VBA RGB | Set Color Of Interior Cell Using RGB Function

All Courses LoginAll BlogsVBA ResourcesVBA RGBVBA RGB

Publication Date :

24 Nov, 2019

Blog Author :

Jeevan A Y

Edited by :

Ashish Kumar Srivastav

Reviewed by :

Dheeraj Vaidya, CFA, FRM

Share

GET: WSM ALL COURSES ACCESSDownload FREE VBA RGB Template and Follow Along!VBA RGB Excel Template

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.

FINANCIAL MODELING 2-DAY BOOTCAMP @75% OFF – NEW YEAR SALE

Master Financial Modeling in Just 2 Days | Build and Forecast IS, BS & CF from Scratch | Perfect for Graduates and Professionals Looking to Upskill this Sale.

Join WallStreetMojo YouTube

INVESTMENT BANKING MASTERY PROGRAM @75% OFF – NEW YEAR SALE

Experience the Exact Training Used by Top Investment Banks | Learn FM, DCF, LBO, M&A, Accounting & More | Unlock Wall Street-Level Skills this Sale.

Join WallStreetMojo Instagram

CHATGPT & AI FOR EXCEL COURSE @75% OFF – NEW YEAR SALE

Boost Productivity 10X with AI-Powered Excel | Automate Reports, Eliminate Errors & Advance Your Analytics Skills | Transform Your Workflow this Sale.

Join WallStreetMojo LinkedIn

EXCEL ALL-IN-ONE BUNDLE COURSE @75% OFF – NEW YEAR SALE

Master Excel, VBA & Power BI Like a Pro | 70+ Hours of Expert-Led Training | Learn Real-World Applications & Earn Your Certification this Sale.

Join WallStreetMojo Facebook

Join WallStreetMojo X