0

Is it possible to set the color of a cell based upon a hex string (e.g., "RRGGBB") or a numeric value and if so how? I have a sheet that converts colors that are stored in BGR format to RGB. I would like would to set the cell color next to the converted RGB value.

Improve this question
7

1 Answer 1

Reset to default
3

You have to use VBA to accomplish your goal. Feel free to modify the routine below, which colors the background of the current cell, according to your needs.

Sub ColorGrey()
    ActiveCell.Interior.Color = RGB(100, 100, 100)
End sub
Improve this answer
5
  • I am getting the error 1004 ("Application-defined or object-defined error") when I use the above code.
    – lordhog
    Oct 18, 2010 at 18:55
  • @lordhog, I tested it in Excel 2003 and it worked great, but you can probably peruse the 2007 help files to see if the syntax has changed. Remember that a cell would probably have to be selected for ActiveCell to work.
    – Lance Roberts
    Oct 18, 2010 at 19:55
  • Also works in 2007. Nice job.
    – Sux2Lose
    Oct 19, 2010 at 18:10
  • Obviously, I doing something wrong. I create a function like "Public Function SetCellColor(r As Integer, g As Integer, b As Integer)" with the code listed, then for a given cell I use "=SetCellColor(HEX2DEC(A1), HEX2DEC(A2), HEX2DEC(A3) )". I will get error 1004. Strange, if I use "ActiveCell.Cells.Borders.Color = RGB(r, g, b)" instead of the code listed it will change the active cell's border color, but it is not changing the cell that has the equation in it. I think error 1004 (from reading) is due to the cell not being activated. I am looking for the cell with the equation to change color
    – lordhog
    Oct 20, 2010 at 18:54
  • Have you tried to use Activesheet.Range("A1") in place of ActiveCell? What does it happen?
    – Toc
    Oct 22, 2010 at 20:25

You must log in to answer this question.

Not the answer you're looking for? Browse other questions tagged .