How to color characters REG, GREEN, YELLOW in the same cell?

B

Bob Hillier

I have seen the VB code that will count cells with a specific color.
I have seen the VB code that will set the font color of all characters in a
cell.
What is the VB code that sets the colour of individual characters in a cell?
For example:
What is the VB code to set 5 characters GREEN,
2 characters YELLOW and 3 characters RED in the same cell?

Why would I want to do this?...

I have 10 project deliverable tasks grouped with the summary task at the
top. Each deliverable task has a status colour assigned (GREEN, YELLOW,
RED). The group summary line has a status cell filled with 10 # characters.
Each # character is to be coloured the colour of one of the 10 deliverable
task's status. This results in what looks like a colour bar showing the
status of all the tasks in the group.

Now, I manually count the number of GREEN, YELLOW and RED cells in a range.
I manually select the correct number of # characters in the summary status
cell and color them GREEN, YELLOW and RED as required. This produces a
visual color bar on the summary line.... manually. (I actually have 112
tasks across 11 function areas and this manual approach is slow, tedious and
error prone.)

How can I automate this with VB code?

Thank you for any suggestions.

Bob
 
M

mudraker

Adjust start, length & colourindex number to suit you needs


ActiveCell.Characters(Start:=1, Length:=5).Font.ColorIndex = 50
ActiveCell.Characters(Start:=6, Length:=2).Font.ColorIndex = 6
ActiveCell.Characters(Start:=8, Length:=3).Font.ColorIndex =
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top