macro to show RGB numbers of a selected cell.

abhay_547 · 11-02-2010, 04:09 PM

Hi All,

I want to come up with a macro which when a user will select a cell and run that macro then the macro will give the RGB numbers of the color pattern which cell has in a msgbox. I have the below code so far. Please expedite.

Please Login or Register  to view this content.

Thanks a lot for your help in advance.

**shg** · 11-02-2010, 08:34 PM

Please Login or Register  to view this content.

E.g., =CellColor(A1)

abhay_547 · 11-02-2010, 11:11 PM

Hi Shg,

Thanks a lot for your reply, But I want to get the RGB code and not Hex code.

Thanks a lot for your help in advance.

**Leith Ross** · 11-02-2010, 11:37 PM

Hello abhay_457,

What is the difference between the proposed solution and your code?

abhay_547 · 11-02-2010, 11:52 PM

Hi Ross,

Thanks a lot for your reply, I want to get the RGB color numbers and not Hex code. for e.g.

Cell A1 is colored / filled with "Light Yellow" color then the RGB for the same will be R = 255, G = 255, B = 153. So I am looking for something which will show Msgbox RGB("A1").

Thanks a lot for your help in advance.

**romperstomper** · 11-03-2010, 03:52 AM

What exactly are you expecting the output to be?

**Leith Ross** · 11-03-2010, 04:14 AM

Hello abhay_547,

Perhaps a macro like this will do...

Please Login or Register  to view this content.

abhay_547 · 11-05-2010, 06:33 AM

Hi Ross,

Thanks a lot for your reply, The code works fine but I am worried that this RGB numbers may differ between MS Excel 2003 and 2007. Do they actually differ ?.

Thanks a lot for your help in advance.

**Marcol** · 11-05-2010, 06:59 AM

Does this help?

Please Login or Register  to view this content.

Enter so

Please Login or Register  to view this content.

[EDIT]
Where did all these replies come from???...

**romperstomper** · 11-05-2010, 08:19 AM

RGB values are always the same for a given colour. However, if you move a file from 2007 to 2003, the colours themselves may change, so the RGB values will be different.